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EINLEITUNG 


C128 - der Weg zum Profi 


D er C128 ist eine ausgezeichnete 
Mischung zwischen »Spiel-Com¬ 
puter« und Profimaschine. Durch 
den integrierten C64 stehen Ihnen die 
unendlich vielen Programme des meist- 
verkauften Computers der Welt zur Ver¬ 
fügung. Der C128-Modus dagegen ist 
eine gelungene Weiterentwicklung des 
C 64: Wesentlich besseres und schnel¬ 
leres Basic, doppelt so viel Speicher¬ 
platz und im Profibereich übliche 80 
Zeichen pro Bildschirmzeile. Damit wer¬ 
den Programme möglich, die den Ver¬ 
gleich zu den viel teureren sogenann¬ 
ten Personal Computern, sprich IBM und ähnliche, nicht zu 
scheuen brauchen und sogar übertreffen. Beispiele sind Pro¬ 
text, Vizawrite Classic oder Vizastar 128: viel schneller als 
zum Beispiel Word oder Lotus 1-2-3 und vor allem wesentlich 
billiger. Sie haben also schon eine gute Wahl getroffen. 

Interessant ist auch der dritte Computer im CI28, der 
CP/M-Modus. Ein Vorteil ist, daß es viele bewährte Pro¬ 
gramme gibt, die auch auf anderen CP/M-Computern laufen. 
Ein weiterer, daß der Einstieg in die PC-, sprich IBM-Welt, 
erleichtert wird. Standard-Software, wie zum Beispiel Word¬ 
star, dBase oder Multiplan, gibt es auch für die »Großen«, 
wenn auch um ein Vielfaches teurer. In immer mehr Firmen 
und Büros werden diese Programme genutzt. Sie haben also 
mit dem C128 und seinem CP/M-Modus den großen Vorteil, 
schon mal zu üben und fit zu werden und zwar zu einem ver¬ 
nünftigen Preis. Auch in diesem Sonderheft finden Sie eine 
große Menge an Tips&Tricks zu Wordstar, dBase, Multiplan 
und CP/M überhaupt. Wenn Sie nicht oder nicht genau wis¬ 
sen, was CP/M eigentlich ist, klären wir Sie darüber ausführ¬ 
lich auf. CP/M ist aber nicht nur für Anwender-Software gut, 
sondern ebenfalls für Programmiersprachen wie Pascal, 
Microsoft-Basic oder CBasic. Diese Basic-Varianten gibt es 
jetzt auch für den C128. Wir stellen beide in einem Test vor. 

Ein echter Knüller wartet auf die Hardware-Freunde unter 
Ihnen: Der komplette C128-Schaltplan, erstmalig in diesem 
64’er-Sonderheft abgedruckt. Für Bastler ist er sicherlich 
unentbehrlich und wenn der Computer mal streiken sollte, ist 
die Fehlerquelle schneller eingegrenzt. Einen Bastelvor¬ 
schlag wollen wir Ihnen nicht vorenthalten: Wer seinen C128 
schon einmal geöffnet hat, wird der freie Steckplatz aufgefal¬ 
len sein. Wir sagen Ihnen, was Sie damit machen können und 
vor allem, wie. 


Ein Megabyte Speicherkapazität pro 
Diskette ist schon fantastisch. Wer hat 
nicht schon mal mit dem Diskettenlauf¬ 
werk SFD1000 geliebäugelt? Vielleicht 
haben Sie aber auch Gelegenheit, an 
ein Doppellaufwerk der alten Commo- 
dore-8000er-Serie heranzukommen. 
In jedem Fall haben Sie jedoch 
Anschlußprobleme mit dem CI28. Ihm 
fehlt eine lEEE-Schnittstelle. In diesem 
Sonderheft präsentieren wir Ihnen ein 
praxiserprobtes lEEE-lnterface zum 
Selbstbauen. Mit diesem Interface, 
einem C64 und einer SFD 1000 wird 
schon seit längerer Zeit eine umfangreiche Mailbox betrie¬ 
ben und zwar ohne Probleme. 

Maschinensprache oder Assembler ist für einige das Non¬ 
plusultra, für andere eine Herausforderung und sehr viele 
haben noch keine Erfahrung damit. Der CI 28 besitzt jedoch 
bekanntermaßen einen Maschinensprache-Monitor, der die 
ersten Schritte in Richtung Maschinensprache gewaltig 
erleichtert. Der TEDMON ist jedoch mehr als eine Hilfe beim 
Programmieren. Mit einem Monitor sollte auch ein Nur-Basic- 
Programmierer umgehen können. Warum und vor allem wie 
erklären wir Ihnen in einem sehr ausführlichen Kurs mit vielen 
Beispielen zum Experimentieren. Im Commodore-Handbuch 
wird zwar die Bedienung des TEDMON beschrieben, nicht 
jedoch die großartigen Möglichkeiten, die man mit ihm reali¬ 
sieren kann. 

Wenn Sie Interesse an Listings zum Abtippen haben, wer¬ 
den Sie voll auf Ihre Kosten kommen. Alle in dieser Ausgabe 
veröffentlichten Basic- und Maschinensprache-Programme 
sind für den C128-Modus gedacht, darunter ein sehr schnel¬ 
les Kopierprogramm für die Floppy 1571. 

Etwas Besonderes gibt es für Pascal-Freunde: Das abge¬ 
druckte Turbo-Pascal-Programm stellt die wichtigsten Infor¬ 
mationen eines beliebigen Pascal-Programms in der Art einer 
Crossreferenzliste zusammen. 

Wir haben auch mit diesem Sonderheft wieder versucht, 
Ihnen möglichst viele Informationen, Tips&Tricks sowie 
Listings zum Abtippen zu geben. Sicherlich können wir nicht 
alle Probleme klären und einige Fragen sind offen geblieben. 
Schreiben Sie uns, was Ihnen gefallen hat, was fehlt oder was 
wir das nächste Mal besser machen können! 
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Das Angebot dieser Ausgabe: 

Butler - 

Betriebssystemerweiterung für den C128 

Butler ermöglicht ein komfortableres Arbeiten mit dem C128: Die Tasta¬ 
turfunktionen werden erweitert und das ohnehin umfangreiche Basic 
7.0 erhält neue, nützliche Befehle So existieren weitere ESC- 
Funktionen genauso wie Anweisungen, die den Speicher direkt beein¬ 
flussen. Auch OLD fehlt nicht. Der Clou aber ist ein Befehl, mit dem sich 
der Z80 im C128-Modus ansprechen läßt. 


1 Diskette für Commodore 128 ___ . 

Bestell-Nr. L6 86 S10 D (sFr. 24,90/öS 299,-') DM 29,90 

- inkl. MwSt. Unverbindliche Preisempfehlung 


64'er-Ausgabe 9/86 
Bestell-Nr. L6 86 09D Oisketle 
DM 29,90' (sFr. 24,90/ÖS 299,-') 
FSD64 (Listing des Monats) 

Im 64'er-Modus mit der 1570/71 
schnell laden (brennfähig) 
Ean-Barcodes (Anwendung des 
Monats) Bar-Codes mit dem 
Epson-Drucker 
Shrinksprite. Sprites drehen 
TipsSTricks zum C128 
Tips&Tricks für Einsteiger 
TIpsSTrlcks für Profis 
Cross-Reference für den C128 
Varlablen-Dump für Anspruchsvolle 
Neue Module für Hypra-Basic 
Hl-Eddl mit dom Star NL-10 
und dem GP 700 VC 
HIRes Colossal (4 Gratikblldschirme 
unter Simons Basic) 

Hardcopy für den 1520 
Der erste Druckerspeeder 
für den MPS 801 
Hardmaker für Epson-Drucker 
Pascal-Kurs für Einsteiger 
(3 Ustlngs) 

TipsSTricks zu Vlzawrile (Toll 9) 


64'er-Ausgabe 8/86 
Bestell-Nr. L6 86 080 Diskette 
DM 29,90' (sFr. 24,90/ÖS 299,-r) 
64'er Comal Sonderservice: 

COMAL 0.14 

Vokabel Trainer - ein geduldiger und 
preiswerter Englisch-Nachhilfe-Lehrer 

(AdM) 


Digi-Controller (LdM) 

Simulieren und Austesten digitaler 
Schaltungen und speicher- 




programmierbarer Steuerungen 

S. 

59 



Grafik Wandler 

S. 

66 

& 

so 

Reise durch den C128 

S. 

70 



TipsSTricks zum C16/C116/Plus4 

S. 

74 



TIpsSTrlcks für Einstelger 

S. 

75 

a 

54 

TipsSTricks für Profis 

& 

80 

& 

58 

MPS Support für den MPS 802 

s. 

91 

s. 

62 

Hypra-Basic wird strukturiert 

a 

92 

s. 

64 

Comalchon für den C128 

s. 

128 

& 

66 

Streifzüge durch die Grafikweit 

S. 138 

s. 

71 

TipsSTricks zu Superbase 

& 149 


S. 79 


S. 82 
S. 93 


S. 94 
S. 95 


S. 137 
S. 169 


& 42 


S. 63 


64'er-Ausgabe 7/86 
Bestell-Nr. L6 86 07D Diskette 
DM 29,90' (SFr. 24,90/ÖS 299,-') 

Dio Wachstumspyramide 
Unvergleichbare Rhythmus¬ 
maschine (AdM) 

Variosystem druckt für Sie (LdM) 
Druckortreiber und Zeichensatzeditor zu 
Master-Text für Epson und MPS802 S. 67 
Voctors: ein lesselndes Spiel für C128 S. 73 
Reset-Schutz für Basic-Programme S. 78 
Basic-Erwelterungen durchschaut 
Hille für Schachspieler 
Newsroom druckt Deutsch 
Neues von Hypra-Basic 


S. 22 


S. 52 
S. 56 


S. 80 
S. 81 
S. 89 
S. 96 


64'er-Ausgabe 6/86 

Bestell-Nr. L6 86 06D Diskette 
DM 29.90' (SFr. 24,90/SS 299,-') 
64'er-Ausgabe 5/86 
Bestell-Nr. L6 86 05D Diskette 
DM 29,90' (sFr. 24,90/öS 299,-') 


64'er-Ausgabe 4/86 

Bestell-Nr. L6 86 04D Diskette 
DM 29,90' (sFr. 24,90/öS 299,-') 
64'er-Ausgabe 3/86 
Bestell-Nr. L6 86 03D Diskette 
DM 29,90' (SFr. 24,90/öS 2B9,-') 
64'er-Ausgabe 2/86 
Bestell-Nr. L6 86 02D Diskette 
DM 29,90' (sFr. 24,90/öS 299,-') 
64’er-Ausgabe 1/86 
Bestell-Nr. L6 86 01D Diskette 
DM 29,90' (sFr. 24,90/öS 299,-') 
64'er-Ausgabe 12/85 
Bestell-Nr. L6 85 12D Diskette 
DM 29.90' (sFr. 24,90/öS 299.-') 
Bestell-Nr. L6 85 12K Kassette 
DM 29,90' (SFr. 24,90/öS 299.-') 
64'er-Ausgabe 11/85 
Bestell-Nr. L6 85 11A 
DM oa ■! V (SFr. 24,90/ÖS 299,-') 
64'er-Ausgabe 10/85 
Bestell-Nr. L6 85 10A 
DM 29.90' (SFr. 24,90/öS 299,-') 
64’er-Ausgabe 9/85 
Bestell-Nr. L6 85 09A 
DM 29,90' (SFr. 24,90/ÖS 299,-') 
64'er-Ausgabe 8/85 
Bestell-Nr. L6 85 08A 
DM 29,90' (SFr. 24,90/öS 299,-') 
64’er-Ausgabe 7/85 
Bestell-Nr. L6 85 07A 
DM 29,90' (SFr. 24,90/OS 299,-') 
64'er-Ausgabe 6/85 
Bestell-Nr. L6 85 06A 
DM 29.90' (sFr. 24,90/öS 299,-') 
64'er-Ausgabe 5/85 
Bestell-Nr. L6 85 05A 
DM 29,90' (SFr. 24.90/öS 299,-') 
64’er-Ausgabe 4/85 
Bestell-Nr. L6 85 04A 
DM 29,90' (sFr. 24,90/öS 299,-') 

64'er-Ausgabe 3/85 

Bestell-Nr. L6 85 03A 
DM 29,90' (SFr. 24,90/ÖS 299,-') 
64'er-Ausgabe 2/85 
Bestell-Nr. L6 85 02A 
DM 29,90' (sFr. 24,90/öS 299,-') 
64'er-Ausgabe 1/85 
8estell-Nr. L6 85 01A 
DM 29,90' (sFr. 24,90/öS 299,-7) 

64’er-Sonderhefte 


Sonderheft 9/86 
Bestell-Nr. L6 88 
DM 29,90' (sFr. 
Sonderheft 8/86 
Bestell-Nr. L6 86 
DM 29,90' (sFr. 
Bostoll-Nr. L6 86 
DM 34,90' (SFr. 
Bestell-Nr. L6 86 
DM 19,90' (sFr. 
Sonderheit 7/86 
Bestell-Nr. L6 86 
DM 29,90' (SFr. 


- Floppy&Datoivorwaltung 

S9 CD 

24,90/öS 299,-') 

- Plus/4 und C16 
S8 CD Diskette 
24,90/ÖS 299,-') 

S8 KC 4 Kassetten 
29,50/öS 349,-') 

S8 KV Kassette 
17,-/öS 199,-') 

- PEEKs & POKEs 
S7D 1 Diskette 
24,90/öS 299,-') 


Sonderheit 6186 - Grafik 

2 Disketten mit allen Programmen 
Bestell-Nr. L6 86 S6D1 
DM34,90' (SFr. 29,50/öS 349.-') 

1 Diskette mit Giga-CAD-Demos 
Bestell-Nr. L6 86 S6D2 

DM 19,90' (sFr. 17,-/öS 199.-') 

3 Disketten mit allen Programmen und Demos 
Bestell-Nr. L6 86 S6D3 

DM 49,80' (SFr. 43,50/ÖS 498,-') 
Sonderheft 5/B6 - Grundwissen 
Bestell-Nr. L6 86 S5D 1 Diskette 
DM 29.90' (sFr. 24,90/öS 299,-') 
Sonderheft 4/86 - Abenteuer 
Bestell-Nr. L6 86 S4D 2 Disketten 
DM 34,90' (SFr. 29,50/ÖS 349,-') 
Sonderheft 3/86 - C16, C116, VC20, Plus/4 
1 Diskette für VC 20 und C16/116: 

Bestell-Nr. L6 86 S3 CD 
DM 29.90' (sFr. 24,90/öS 299.-') 

1 Kassette für VC 20: 

Bestell-Nr. L6 86 S3 KV 
DM 19,90' (SFr. 17.-/ÖS 199.-') 

1 Kassette für C16: 

Bestell-Nr. L6 86 S3 KC 
DM 19,90' (SFr. 17.-/ÖS 199,-*) 

Sonderheft 2/86 - TIpsSTrlcks 
Bestell-Nr. L6 86 S2D Diskette 
DM 29,90' (SFr. 24,90/öS 299.-') 
Sonderheft 1/86-C 128er 
Bestell-Nr. L6 86 S1D Diskette 
DM 29,90' (sFr. 24,90/ÖS 299.-') 
Sonderheft 8/85 - Assembler 
Bestell-Nr. L6 85 S8D Diskette 
DM 29.90' (sFr. 24,90/öS 299,-') 
Bestell-Nr. L6 85 S8K Kassette 
DM 19,90' (sFr. 17.-/OS 199,-') 

Sonderheft 7/85 - Professionelle Anwendungen 
Bestell-Nr. L6 85 S7D 2 Diskotten 
DM 34,90' (sFr. 29,50/öS 349,-') 

Bestell-Nr. L6 85 S7K 4 Kassetten 
DM 34,90' (SFr. 29,50/öS 349,-') 
Sonderheft 6/85 - Top-Themen 
Bestell-Nr. L6 86 S6 2 Disketten 
DM 34,90' (sFr. 29.50/ÖS 349.-') 
Sonderhott 5/85 - Floppy, Datasette 
Bostoll-Nr. L6 85 S5D Diskette 
DM 29,90' (SFr. 24,90/ÖS 299,-') 
Bestell-Nr. L6 85 S5K Kassette 
DM 19.90' (sFr. 17,-/OS 199,-') 

Sonderheft 4/85 - Grafik 
Bestell-Nr. L6 85 S4A 
DM 29.90' (sFr. 24,90/öS 299,-') 
Sonderheft 3/85 - Spiele 
Bestell-Nr. L6 85 S3 A 2 Disketten 
DM 34,90' (SFr. 29,50/öS 349,-') 
Sonderhoft 2/85 - Abentouersplele 
Bestell-Nr. L6 85 S2 
DM 34.90' (8Fr. 29,50/öS 349,-') 
Sonderheft 1/85 - TIpsSTrlcks 
(2.üborarb. Auflage) 

Bestell-Nr. CB 023 Floppy-Utllities 
DM 29,90' (sFr. 24,90/öS 299,-') 
Bestell-Nr. CB 024 Hilfsprogramme 
DM 29,90' (sFr. 24,90/öS 299,-') 

' inkl.MwSt. Unverbindliche Preisempfehlung. 


Bitte verwenden Sie für Ihre Bestellung und Überweisung die eingeheftete Postgiro-Zahlkarte, 
oder senden Sie uns einen Verrechnungs-Scheck mit Ihrer Bestellung. 

Sie erleichtern uns die Auftragsabwicklung, und dafür berechnen wir Ihnen keine Versandkosten. 
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LESERFORUM 


Fragen 

und Antworten 
zum C128 


Probleme mit C128 

Als Besitzer eines neuen 
CI28 bin ich auf zwei Pro¬ 
bleme gestoßen, bei denen 
ich vermute, daß mein C128 
nicht ganz in Ordnung sein 
könnte: 

(1) Die programmierte 
Umschaltung auf die DIN- 
Tastatur mittels »POKE 1,0« 
(siehe Handbuch, Kapitel 4.1, 
Seite 2) klappt bei mir nicht. 
Gibt es eine andere Möglich¬ 
keit zur Tastaturumschal- 
tung? 

(2) Zeichne ich im hochauf¬ 
lösenden Grafikmodus zum 
Beispiel zwei Kreise in einer 
bestimmten Farbe, und ver¬ 
binde diese dann mit einer 
Linie in einer anderen Farbe, 
so werden diese verschiede¬ 
nen Farben nicht voneinander 
getrennt, sondern es wird 
gleich das ganze Umfeld der 
Schnittstelle neu eingefärbt. 
Was kann ich dagegen tun? 

Oliver Hobert 

Zunächst eine gute Nachricht: 
Ihr C 1 28 ist, zumindest was die 
beschriebenen Symptome 
angeht, völlig in Ordnung. 

(1) Die programmgesteuerte 
Tastaturumschaltung funktio¬ 
niert auch bei Ihrem C128. Es 
handelt sich hier um einen Feh¬ 
lerim Handbuch. Versuchen Sie 
die Umschaltung mit >POKE 0, 
PEEK(O) AND 64:POKE 1,0«. 

(2) Dieser Effekt hat eine ver¬ 
blüffend einfache Ursache: Im 
hochauflösenden Grafikmodus 
kann der CI28 zwar einzelne 
Grafikpunkte setzen oder 
löschen, es ist jedoch nicht 
möglich, jedem Punkt eine indi¬ 
viduelle Farbe zu geben. Die 
Farbgebung im hochauflösen¬ 
den Modus entspricht genau 
derjenigen im Textmodus, das 
heißt, es kann jede Zeichenposi¬ 
tion (25x40 Positionen auf dem 
Bildschirm) eine Farbe anneh¬ 
men. Mit anderen Worten: Die 
gewählte Farbe kann nicht 
punktweise, sondern nur pro 8 x 
8-Punkte-Bereich (eben gerade 
eine Zeichenposition) frei 
gewählt werden. Innerhalb einer 
8 x 8-Zeichenmatrix haben 
immer alle 64 Grafikpunkte die 
gleiche Farbe. Ihr spezielles 
Problem läßt sich nur durch Ver¬ 
wendung des Multicolormodus 
lösen. In diesem Vielfarbenmo¬ 
dus kann jeder einzelne Grafik¬ 
punkt eine von vier möglichen 
Farben haben. Allerdings ist die 
Auflösung in diesem Modus mit 
160 x 200 Punkten nur noch 
halb so groß wie im hochauflö¬ 
senden Grafikmodus. 


Was kann die 
1571-floppy? 

(1) Können eine 1541 und 
eine 1571 gleichzeitig am 
C128 betrieben werden, um 
C64-Dateien auf das 1571- 
Format zu überspielen? 

(2) Ist das C128-CP/M kom¬ 
patibel zum C64-CP/M, das 
heißt, können CP/M-Program- 
me vom C64 auch auf dem 
C128 laufen? 

(3) Wie können Dateien des 
C 64-CP/M auf das Format der 
1571 gebracht werden? 

(4) Kann man beim C128 
unter CP/M auch die alte 1541 
benutzen? 

Dietmar Hoffman 

(1) Natürlich, es ist kein Pro¬ 
blem, beide Laufwerke gleich¬ 
zeitig zu betreiben. Sie brau¬ 
chen dazu nur die Gerätenum¬ 
mer einer der beiden Laufwerke 
von 8 auf 9 zu ändern. 

(2) Das CP/M Plus des C128 
ist kompatibel zum CP/M 2.2, 
das auf dem C64 mit CP/M- 
Modui läuft. Bei einigen Pro¬ 
grammen (wie Textverarbeitung 
etc.) kann eine neue Anpassung 
mittels eines speziellen (immer 
mitgelieferten) Install-Pro- 
gramms notwendig werden. 

(3) Zum Überspielen vom 
1541-Förmat auf das 1571- 
Laufwerk formatiert man eine 
Diskette im 1571-Format, dann 
die alte Diskette darauf kopieren 
- fertig. 

(4) Das CP/M des CI28 läuft 
auch mit der 1541. Eine CP/M- 
Diskette im 1541-Förmat liegt 
jedem CI28 bei. 


Fragen zum C128 

(1) Gibt es für den C128 ein 
Grafikprogramm, bei dem man 
die gezeichneten Bilder über 
»BLOAD« laden und in eige¬ 
nen Programmen verwenden 
kann? 

(2) Kann man beim C128 
mehrere Windows definieren, 
oder wird bei Definition eines 


weiteren Windows das alte 
gelöscht? 

(3) Wie hebt man eine 
Window-Definition wieder 
auf? 

(4) Kann man In Basic (ohne 
POKEs) Sprites um bestimmte 
Winkel drehen? 

(5) Kann man Sprites um 
beliebig viele Punkte vergrö¬ 
ßern oder verkleinern? 

(6) Wenn ein Sprite mit der 
PAINT-Anweisung ausgefüllt 
und anschließend bewegt 
wird, bleibt das Sprite dann 
ausgefüllt oder bleibt die aus¬ 
gefüllte Fläche am gleichen 
Ort zurück? 

(7) Im Markt&Technik-Buch 
»Das C128-Handbuch« ist ein 
Listina für Grafik auf dem 
80-Zeict in-Bildschirm abge¬ 
druckt. Ich weiß aber nicht die 
Adressen dieses Programms 
und kann es daher auch nicht 
mit »BSAVE« speichern. 

(8) Wie kommt man (in 
Basic) an den zweiten 
Schreib-/Lesekopf der 1571- 
Floppy? 

Thomas Weberstaedt 

(1) Ein spezielles Grafikpro¬ 
gramm für den C128-Modus ist 
uns bislang noch nicht bekannt. 
Sie können aber einfach ein ent¬ 
sprechendes Programm für den 
C64 (im C64-Modus) benut¬ 
zen, um Ihre Bilder zu malen. 
Diese Bilder lassen sich dann 
völlig problemlos auch im 
CI 28-Modus laden (die Grafik 
ist in beiden Betriebsarten die 
gleiche). Nähere Hinweise dazu 
erhalten Sie entweder im Hand¬ 
buch zum Grafikprogramm oder 
(hoffentlich) auf Anfrage beim 
Hersteller. 

(2) Nein, sobald ein Fenster 
(Window) definiert wird, ist die 
vorherige Einstellung verges¬ 
sen. 

(3) Im Direktmodus wird die 
Window-Definition durch zwei¬ 
maligen Druck auf die 
< HOME > -Taste, im Programm 
am einfachsten durch Definition 
eines neuen Windows (das 
natürlich auch den gesamten 
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Bildschirm umfassen kann) 
gelöscht. 

(4) Das ist nicht möglich. 

(5) Nur die bekannte Verdopp¬ 
lung der Sprite-Größe in X- und 
Y-Richtung ist möglich. 

(6) Die PAINT-Anweisung 
bezieht sich nur auf die hoch¬ 
auflösende Grafik. Es ist damit 
nicht möglich, Sprites auszufül¬ 
len. 

(7) Bei dem abgedruckten 
Listing handelt es sich um ein 
Assembler-Programm. Die vier¬ 
stellige Zahl am Anfang jeder 
Zeile ist die (hexadezimale) 
Adresse jedes Befehls. Das 
Programm wird mit dem einge¬ 
bauten Maschinensprache-Mo¬ 
nitor des C128 eingegeben und 
gespeichert. Die Anfangs- und 
Endadresse des Programms ist 
einfach die Adresse des ersten 
und des letzten Befehls, geht 
also von $1400 bis $157F. 

(8) Der Zugriff auf die eine 
oder andere Diskettenseite wird 
vom DOS der 1571 selbständig 
geregelt. Sie brauchen keine 
besonderen Vorkehrungen zu 
treffen, um einen Schreib-/ 
Lesekopf auszuwählen. 


Kopieren mit 
1541 und 1571? 

Kann man mit einer 
1541-Floppy und dem neuen 
1571-Laufwerk Disketten von 
einem Laufwerk zum anderen 
kopieren? Funktionieren alle 
Kopierprogramme auch mit 
der 1571? 

Dieter Stahlhofer 

Die 1571 kann Disketten der 
1541 sowohl lesen als auch 
selbst in diesem Format 
beschreiben. Das Kopieren mit 
zwei Laufwerken ist prinzipiell 
möglich. Sie müssen aber einen 
wichtigen Punkt beachten: 
Wenn Sie den CI28 in den 
C64-Modus schalten, geht die 
1571-Floppy automatisch in 
den 1541-Modus. Leider ist die 
1571 nur eingeschränkt kompa¬ 
tibel zur 1541. Die meisten 
Kopierprogramme (insbeson¬ 
dere die schnellsten) laufen 
nicht mit der 1571. Dasselbe gilt 
übrigens auch für kopierge¬ 
schützte C64-Software. Die 
meisten kopiergeschützten 
Programme laufen auf einer 
1571 nicht. Das führt dann zu 
der oft merkwürdigen Situation, 
daß Besitzer von (teuren) Origi¬ 
nalen beim Umstieg vom C64 
zum CI28 Ihre Software nicht 
mehr verwenden können. 
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RS232C und CP/M? 

Beim C128 gibt es unter 
CP/M Probleme, die RS232C- 
Schnittstelle anzusprechen, 
die im C128- und im 
C64-Modus einwandrei funk¬ 
tioniert. Unter CP/M wird bei 
Aufruf der entsprechenden 
Routinen zwar die Ausgabe 
verlangsamt, aber an keinem 
einzigen Pin des User Ports 
erscheint ein Signal. 

Manfred Kramer 

Da es unter CP/M anschei¬ 
nend Probleme mit der seriellen 
Schnittstelle gab, hat Commo- 
dore die entsprechenden 
CP/M-Routinen einfach mit 
einem RET-Opcode »gesperrt«. 
Die seriellen CP/M-Routinen 
lassen sich zwar noch auf rufen, 
aber kehren ganz einfach unver¬ 
richteter Dinge wieder zurück. 


C128 ohne 

Commodore-Monitor? 

Welche Lösung gibt es, 
wenn man den C128 auf 80 
Zeichen bringen will, ohne 
den Original-Monitor von 
Commodore verwenden zu 
wollen? Welche Firma stellt 
eine entsprechende Kabelver¬ 
bindung her? 

Bernd Becks 

Leider ist Ihr Problem auch 
nicht so generell zu lösen, denn 
es gibt eine ganze Zahl ver¬ 
schiedener Steckernormen. 
Außerdem wollen Sie ja 
bestimmt nicht auf den 
40-Zeichen-Modus verzichten, 
so daß auf jeden Fall eine Spe¬ 
zialschaltung notwendig wird, 
da der CI28 bekanntlich zwei 
völlig unterschiedliche Video¬ 
normen für 40 und 80 Zeichen 
verwendet. Falls Ihnen ein 
monochromer Monitor aus¬ 
reicht, können Sie die in unse¬ 
rem »128’er«-Sonderheft, Aus¬ 
gabe 1/86, abgedruckte Schal¬ 
tung verwenden, mit der Sie von 
der Computertastatur aus zwi¬ 
schen 40 und 80 Zeichen 
umschalten können. Eine Über¬ 
sicht über Farbmonitore auch 
für den CI28 finden Sie in der 
Ausgabe 1/86 des 64'er-Maga- 
zins. Welche Kabelverbindung 
Sie benötigen, richtet sich nicht 
zuletzt auch nach dem von 
Ihnen gewählten Monitormo¬ 
dell. Sie müssen sich also 
zuerst für einen Monitor ent¬ 
scheiden, ehe Sie sich ein 
Kabel kaufen können. 


MPS 801 am C128? 

Kann der Commodore- 
Drucker MPS 801 am C128 in 
allen drei Betriebsarten (C64, 
C128, CP/M) ohne Interface 
betrieben werden? Die befrag¬ 
ten Commodore-Händler be¬ 
antworteten diese Frage zu 
jeweils gleichen Teilen mit 
»ja« und »nein«. 

Iris und Joachim Maliach 

Alle Commodore-Drucker ar¬ 
beiten in allen drei Betriebsarten 
einwandfrei mit dem CI28 
zusammen. Da Commodore 
sich jedoch beim Zeichensatz 
seiner Computer (und Drucker) 
an keinerlei Normen wie ASCII 
oder DIN gebunden hat, treten 
Probleme beim DIN-Modus des 
C128 auf. Im DIN-Modus ist der 
'Zeichensatz nämlich entspre¬ 
chend der DIN-Norm codiert 
(also Standard-ASCII-Zeichen 
plus deutsche Sonderzeichen). 
Alle MPS-Drucker verstehen 
aber nur die »Commodore- 
Norm«, so daß Sie den CI28 
beim Betrieb mit einem MPS- 
Drucker im DIN-Modus nicht 
optimal verwenden können. 
Anders sieht die Sache bei 
CP/M aus. Auf der Systemdis¬ 
kette befindet sich ein Pro¬ 
gramm namens »SETUP.COM«, 
mit dem Sie das CP/M-System 
an verschiedene Druckertypen 
anpassen können. Wenn Sie 
einen Commodore-Drucker ver¬ 
wenden, wählen Sie bei diesem 
Programm einfach die entspre¬ 
chende Option (»C« für Commo¬ 
dore) aus und können dann 
sogar, falls Ihr Drucker dazu 
fähig ist, deutsche Umlaute zu 
Papier bringen. Ein Interface für 
Commodore-Drucker ist nicht 
erforderlich. 


Schwierigkeiten mit 
dem C128 

(1) Manche Spiele laufen im 
C64-Modus nicht richtig. Der 
Bildschirm ist dann mit vielen 
grafikähnlichen Zeichen be¬ 
schrieben und es tut sich rein 
gar nichts mehr. 

(2) Der MSE 1.0 aus der 64’er 
funktioniert bei mir nicht. Er 
ignoriert alle Tasten außer Q, 
Z, 2 und der Leertaste. 

(3) Nach einem Reset blei¬ 
ben Maschinensprache-Pro¬ 
gramme offenbar im Speicher 
stehen und werden nicht 
gelöscht. Ist dieser Umstand 
normal? 


(4) Warum kann der C128 
Programme für den C64 trotz 
seiner sprachlichen Kompati¬ 
bilität nicht auch im C128- 
Modus direkt ausführen? 

(5) Ist es normal, daß im 
40-Zeichen-Modus bei be¬ 
stimmten Farbkombinationen 
die Buchstaben verwischt und 
unleserlich werden? 

(6) In verschiedenen Arti¬ 
keln ist von einer RS232C- 
Schnittstelle über den User 
Port die Rede. Ich brauche 
eine solche Schnittstelle zum 
Anschluß meines Druckers, 
habe aber kein Programm, um 
den User Port ansprechen zu 
können. 

Fritz Liedebach 

(1) Es ist möglich, daß einige 
Spiele infolge des verwendeten 
Kopierschutzes nicht richtig mit 
einem 1570/1571-Laufwerk ge¬ 
laden werden können. 

(2) Entweder haben Sie den 
MSE falsch abgetippt, oder Sie 
betreiben das Programm irrtüm¬ 
lich im C128-Modus (was nicht 
funktionieren kann). Der MSE ist 
auf jeden Fall ohne Fehler. 

(3) Bei einem Reset wird nur 
der Computer neu initialisiert, 
Machinenprogramme bleiben 
aber fc» "er Regel erhalten. 

(4) Der Grund hierfür ist die 
völlig andere Speicherverwal¬ 
tung (Bankswitching) im 
C128-Modus gegenüber dem 
C64. Die meisten POKE-, 
PEEK- und SYS-Befehle des 
C64 funktionieren daher nicht 
im C128-Modus. 

(5) Bei einigen Farbkombina¬ 
tionen ist der Monitor einfach 
überfordert: Die Zeichen wer¬ 
den verschwommen und un¬ 
deutlich dargestellt. Dies ist völ¬ 
lig normal und kein Grund zur 
Beunruhigung. 

(6) Um die RS232C-Schnitt- 
stelle anzusprechen, brauchen 
Sie keine zusätzliche Software. 
Diese ist bereits im Betriebssy¬ 
stem vorhanden. In der Aus¬ 
gabe 5/86 des 64’er-Magazins 
finden Sie nähere Informationen 
über die RS 232C-Schnittstelle 
des C 64, die mit der des C128 
identisch ist. 


CP/M-Probleme beim 
C128 

Ich arbeite seit einiger Zeit 
mit Wordstar 3.0 für den C128. 
Beim Ausdrucken erscheinen 
nun stets die beiden letzten 
Zeichen einer Textzeile in der 
nächsten Druckzeile und zwar 


am äußersten linken Rand, 
während eine normale Text¬ 
zeile etwas weiter rechts be¬ 
ginnt. Ich habe festgestellt, 
daß man diesen Effekt verhin¬ 
dern kann, indem man die 
rechte Randeinstellung auf 70 
Zeichen begrenzt. Allerdings 
scheint mir das doch recht 
unkomfortabel zu sein. 

Volker Zietek 

Wordstar fängt beim Aus¬ 
druck nicht am äußersten linken 
Rand an, sondern läßt links und 
rechts vom Text etwas Raum 
frei. Dadurch hat man beim Aus¬ 
druck nicht die vollen 80 Zei¬ 
chen zur Verfügung, sondern 
weniger. Durch diese Eigen¬ 
schaft von Wordstar wird das 
Erscheinungsbild einer ge¬ 
druckten Seite stark verbessert 
und ähnelt mehr einer konven¬ 
tionellen Schreibmaschine, die 
ja auch nur etwa 60 bis 65 Zei¬ 
chen in eine Zeile bringt. Wenn 
man unbedingt die volle Druck¬ 
breite ausnutzen möchte, kann 
man den linken und rechten 
Rand auch abschalten. Hierzu 
verwendet man das Installations¬ 
programm. Nähere Angaben 
hierzu gibt das Handbuch. 


MS-DOS für den C128 

Seit kurzem besitze ich den 
CI 28 mit CP/M-Betriebssy- 
stem. Da ich ihn hauptsäch¬ 
lich gewerblich nutze, ist na¬ 
türlich das Betriebssystem 
MS-DOS für mich interessan¬ 
ter. Ich möchte daher fragen, 
ob es irgendwann eine MS- 
DOS-Systemdiskette für den 
C128 geben wird? 

Michael Kundler 

Das wird es ganz sicher nicht 
geben, denn CP/M ist ein 
Betriebssystem für den Z80- 
Prozessor von Zilog, während 
MS-DOS ein Betriebssystem für 
den 8086 von Intel Ist. Um MS- 
DOS betreiben zu können, brau¬ 
chen Sie einen IBM-kompatib- 
len PC; auf dem CI28 ist es 
jedenfalls nicht möglich. 


Apple-CP/M auf dem 
C128? 

Kann man die CP/M-Version 
2.20B für den Apple II plus 
auch auf dem C128 laufen las¬ 
sen? 

Santosh C. Purakal 
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LESERFORUM 


Wie lassen sich also Spei¬ 
cher-Bank 0 und 1 von Basic 
aus manipulieren, so daß dem 
Basic-Programm eben nur 
soviel Speicherplatz zukommt, 
wie es effektiv benötigt, der 
restliche Speicherbereich (so¬ 
wohl von Bank 0 als auch von 
Bank 1) aber voll für Variable 
zur Verfügung steht? 

Wolfgang Schwenkglenks 

Dieses Problem wäre nur 
durch eine umfangreiche Basic- 
Erweiterung zu lösen, die 
wesentlich häufiger von dem 
zeitraubenden Verfahren des 
Bankswitching Gebrauch 
macht, als es das Basic 7.0 tut. 
Eine einfache Lösung für Ihr 
Problem (etwa ein paar POKE- 
Befehle oder ähnliches) ist auf 
jeden Fall nicht möglich. 

Sie sollten sich vielleicht eher 
einmal überlegen, ob es nicht 
möglich ist, einige besonders 
umfangreiche Feldvariable in 
Form einer sequentiellen oder 
relativen Datei auf Diskette aus¬ 
zulagern und somit Speicher¬ 
platz zu sparen. 


Funktionstesten 

Im C 64-Modus meines C128 
kann ich die Funktionstasten 
mit Hilfe des Befehls »GET« 
abfragen. Da im C128-Modus 
die Funktionstasten mit 
Befehlen belegt sind, erhalte 
ich immer nur die »CHR$«- 
Codes für die Basic-Wörter. 
Wie kann ich die Funktions¬ 
tasten auch im C128-Mode 
effektiv abfragen? 

Hans Schnurr 


Programme vom C64 
auf den C128 

Wie kann ein Datenverwal¬ 
tungsprogramm vom C64 auf 
den C128 umgesetzt werden? 
Meine Anfragen bei Compu¬ 
tershops variierten zwischen 
»Das ist völlig unmöglich« und 
»Da gibt es gar keine Schwie¬ 
rigkeiten«. 

Hans Merkert 

Für die Umsetzung der Pro¬ 
gramme ist einiges zu beach¬ 
ten. Zu allererst sollten in den 
C64-Programmen keine Ma¬ 
schinenroutinen enthalten sein, 
da der CI28 mit einer völlig 
anderen Speicherverwaltung 
arbeitet. Ist die Dateiverwaltung 
komplett in Basic geschrieben, 
können Sie das Programm ohne 
Probleme auf dem C128 laufen 
lassen. Basic 2.0 ist aufwärts¬ 
kompatibel zum Basic 7.0. Na¬ 
türlich bietet Basic 7.0 viel mehr 
Möglichkeiten, auch in Hinsicht 
auf Dateiverwaltung. Die einzel¬ 
nen Befehle vor allem zum Be- 
und Verarbeiten von relativen 
Dateien sind weitaus komforta¬ 
bler als die Programmierung im 
C 64-Modus. Die umständliche 
Ansteuerung der einzelnen Da¬ 
tensätze mit wüsten »CHR$«- 
Kombu ictionen ist durch einen 
komfortablen »RECORD«-Be- 
fehl ersetzt. Auch die Handha¬ 
bung sequentieller Dateien 
gestaltet sich durch das komfor¬ 
table Basic 7.0 wesentlich ein¬ 
facher. Durch die doppelte 
Speicherkapazität des C128 
können natürlich auch größere 
Datenmengen im Speicher ver¬ 
arbeitet werden. 


Wenn Sie damit etwa meinen 
sollten, ob man eine CP/M- 
Diskette des Apple auf dem 
C128 booten kann, dann ist die 
Antwort auf jeden Fall »nein«. 
Sie können generell niemals die 
CP/M-Systemdisketten eines 
Computers auf einem anderen 
System laufen lassen, denn das 
CP/M-System dient gerade 
dazu, die völlig unterschiedliche 
Hardware der einzelnen Com¬ 
puter per Software kompatibel 
zu machen. Das bedeutet aber, 
daß das CP/M-System selbst 
natürlich geräteabhängig ist. 
Für jedes Computermodell muß 
das CP/M-System daher spe¬ 
ziell angepaßt werden. 

Wenn Sie allerdings meinen, 
ob CP/M-Programme von Apple 
auch auf dem CI28 lauffähig 
sind, kann man dazu nur folgen¬ 
des sagen: Alle CP/M-Program¬ 
me, egal für welchen Computer, 
laufen auf dem C128 - es sei 
denn, es handelt sich um sol¬ 
che, die unter Umgehung des 
CP/M-Standards direkt bestimm¬ 
te Hardwareeigenschaften ei¬ 
nes Computers ansprechen. 
Um ein beliebiges CP/M-Pro- 
gramm eines anderen Compu¬ 
ters auf dem C128 laufen zu las¬ 
sen, müssen Sie es nur auf eine 
C128-Systemdiskette kopie¬ 
ren. 

Bei Programmen, die eine 
anspruchsvollere Bildschirm¬ 
ausgabe benötigen (Textverar¬ 
beitungsprogramme, etc.) ist 
allerdings in den meisten Fällen 
noch eine spezielle Installation 
notwendig. Das genaue Vorge¬ 
hen in diesen Fällen ist in den 
jeweiligen Handbüchern zu die¬ 
sen Programmen beschrieben. 


Speicherprobleme 
beim C128? 

Ich habe ein Statik-Pro¬ 
gramm für den C128 ent¬ 
wickelt, das folgende Proble¬ 
matik aufweist: Das Programm 
selbst hat eine Länge von 16,5 
KByte, so daß in der Speicher¬ 
bank 0 noch über 40 KByte 
eigentlich ungenutzt verblei¬ 
ben. Das Programm benötigt 
insgesamt aber etwa 100 
KByte für Variable (einfache 
Variable und Felder). Wie mir 
bekannt ist, werden diese 
Variable in der Speicherbank 
1 verwaltet. Allerdings sind 
hier effektiv nur 62 KByte für 
Variable frei. Mir fehlen also 
rund 40 KByte an Variablen¬ 
speicher, die aber in Bank 0 
verfügbar wären. 


Im C128-Modus können Sie 
mit den Funktionstasten viel 
professioneller arbeiten als im 
C 64-Modus. Der nötige Befehl 
lautet »KEY«. Damit können Sie 
die Belegung der Funktionsta¬ 
sten am Bildschirm anzeigen 
oder ändern (lesen Sie dazu das 
entsprechende Kapitel in Ihrem 
Handbuch nach). Wenn Sie bei 
der Definition der Funktions¬ 
tasten an das Ende des entspre¬ 
chenden Ausdrucks ein 
*CHR$(13)« anhängen, läßt 
sich die Funktionstaste auch mit 
dem »INPUT«-Befehl verwen¬ 
den. Man drückt die entspre¬ 
chende Funktionstaste und 
schon ist die Variable mit dem 
String der Funktionstaste 
belegt. Beim Einschalten des 
C128 sind die Funktionstasten 
bereits mit nützlichen Anwei¬ 
sungen belegt. 


Speichererweiterung 
und Maus 

Wann sind endlich Maus 
und Speichererweiterung für 
den C128 erhältlich und was 
kosten sie? 

Achim Pankalla 

Angekündigt sind diese 
Systemkomponenten bekannt¬ 
lich schon seit der Auslieferung 
des C128. Doch leider hat eine 
Ankündigung nichts mit einer 
Auslieferung zu tun. Mit den 
Speichererweiterungen 1700 
(256 KByte) und 1750 (512 
KByte) dürfte nach Aussagen 
von Commodore zum Weih¬ 
nachtsgeschäft 1986 zu rech¬ 
nen sein. In den USA werden 
diese bereits angeboten. Die 
Maus dürfte noch etwas länger 
auf sich warten lassen. 


Cursor-Positionierung 

Mit welcher Anweisung 
kann ich beim C128 den Cur¬ 
sor an eine beliebige Bild¬ 
schirmstelle positionieren? 
Benötige ich dazu einen 
POKE-Befehl? 

Jörg Welders 

Um den Cursor zu positionie¬ 
ren, bietet der CI28 eine ver¬ 
blüffend einfache Lösung an. 
Die Positionierung erfolgt über 
den Grafikbefehl »CHAR«. Wol¬ 
len Sie den Cursor zum Beispiel 
etwa in der Bildschirmmitte ste¬ 
hen haben, geben Sie folgen¬ 
den Befehl ein: »CHAR ,38,12«, 
wobei 38 die Spalte und 15 die 
Zeile angibt. 


Software für den C128 

Gibt es bereits Software für 
den C128? Wenn ja, welche 
und was kostet Sie? 

Jens Bildner 

Da der C128 drei Betriebssy¬ 
steme hat (C64, CI28 und 
CP/M), können Sie auf ein reich¬ 
haltiges Softwareangebot zu¬ 
rückgreifen. Für den C64 gibt 
es jede Menge Spiele und auch 
ernsthafte Anwendungen. Im 
CP/M-Modus steht eine riesige 
Palette von Branchen- und all¬ 
gemeiner Anwendungssoft¬ 
ware zur Verfügung. Sie erhal¬ 
ten praktisch alles von der Text¬ 
verarbeitung über Verwaltungs¬ 
systeme bis hin zu den 
verschiedensten Compilern. 
Besonders bieten sich CP/M- 
Klassiker wie dBase II, Word¬ 
star, Multiplan und MBasic an, 
um nur eine kleine Auswahl zu 
nennen. Für den C128-Modus 
sind ebenfalls einige leistungs¬ 
fähige Programme erhältlich. Es 
gibt mehrere Textverarbeitun¬ 
gen und auch einige Compiler. 
Beachten Sie dazu bitte die ent¬ 
sprechenden Testberichte und 
Anzeigen in der Zeitschrift 
64’er. Ein neuer Computer hat 
immer mit dem Problem der Ver¬ 
zögerung des Softwareange¬ 
bots nach seiner Einführung zu 
kämpfen. Dies trifft auch für den 
CI28 in seinem ureigensten 
Modus zu. Programm-Neuent¬ 
wicklungen und Adaptionen be¬ 
stehender Programme für den 
C64 auf dem CI28 beweisen, 
daß sich mit diesen nahezu pro¬ 
fessionell arbeiten läßt. Neuer¬ 
dings stehen auch eine lei¬ 
stungsfähige Datenbank und 
ein Kalkulationsprogramm zur 
Verfügung. 
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HARDWARE 


C 128 


Der C128 wächst... 


Bild 1. Die Platine des 
CI28. Der freie 
Steckplatz neben dem 
ROM des CI 28- 
Betriebssystems kann 
leicht für eigene Pro¬ 
gramme in EPROMs 
genutzt werden. 



Wenn Sie Ihren C128 schon einmal geöffnet 
haben, dann wird Ihnen sicherlich der leere 
Sockel auf der Platine aufgefallen sein. Was man 
damit alles anfangen kann, sagt Ihnen der fol¬ 
gende Artikel. 

N eben einer Vielzahl an Bausteinen enthält der C128 
auch einen Sockel, der beim Kauf des Geräts noch 
nicht belegt ist. Dieser freie Steckplatz eröffnet uns 
eine Vielzahl an Möglichkeiten. Schrauben Sie das Gehäuse 
Ihres CI28 auf (Vorsicht! Garantieverlust), dann erkennen 
Sie den leeren Sockel auf der linken Platinenseite neben dem 
ROM des CI28-Betriebssystems (Bild 1). Der Sockel trägt 
die Bezeichnung U 36 und ist für ein 16- oder 32 KByte 
EPROM (27128 oder 27256) vorgesehen. 

Was kann man nun mit diesem Zusatz anfangen? Leider gibt 
es bisher so gut wie keine Information über die Beschaltung 
und das Ansprechen eines EPROMS in diesem Sockel, so 
daß wir für Sie einmal auf Entdeckungsreise gegangen sind. 

Wie Sie sicherlich wissen, kann man sowohl in den C 64 als 
auch in den C128 Erweiterungsmodule in einen dafür vorge¬ 
sehenen Steckplatz auf der Rückseite des Computers 
stecken. Diese Buchse nennt sich Erweiterungs- oder 
Expansion-Port. 

Der CI28 kann sowohl die Module eines C64 als auch 
seine »eigenen« erkennen und schaltet dabei in den entspre¬ 
chenden Modus. Die Module des C64 werden dabei 
dadurch identifiziert, daß sie die EXROM- und die GAME- 
Leitung für ihre Zwecke verwenden. Sie schalten sich also 
hardwaremäßig ein. 

Beim C128 gingen die Entwickler einen anderen Weg. Hier 
kommt die MMU (»memory management unit« oder 
»Speicherverwaltungs-Einheit«) ins Spiel. Da der C128 meh¬ 
rere Speicherbänke zu je 64 KByte verwalten kann, muß zwi¬ 
schen den einzelnen Bänken auch umgeschaltet werden, um 
auf jedes Byte des Speichers zugreifen zu können. 

Diese Umschaltung regelt die MMU, wobei auf Wunsch 
eine bestimmte Konfiguration des Speichers eingestellt wer¬ 
den kann. Dazu muß man wissen, daß der Speicher des 


CI28 in einen RAM-, einen unteren, einen mittleren und 
einen oberen Speicherbereich aufgeteilt ist. Dabei geht der 
untere Bereich von $4000 bis $7FFF, der mittlere von 
$8000 bis $BFFF und der obere von $C000 bis $FFFF. Der 
RAM Bleich von $0000 bis $3FFF kann, wie der Name 
schon sagt, nur RAM enthalten. Die drei anderen Bereiche 
könnnen jedoch wahlweise mit einer bestimmten Belegung 
versehen werden (Bild 2). 

Wir wollen die Ausführungen an dieser Stelle zwar so 
knapp wie nur möglich halten, die wichtigsten Hinweise zur 
Einstellung der Speicherkonfiguration sollen jedoch an die¬ 
ser Stelle gegeben werden. Für detailliertere Informationen 
kann das Handbuch zum C128 zu Rate gezogen werden. 

Für die Einstellung der Speicherkonfiguration existiert in 
der MMU ein wichtiges Register: das Konfigurationsregister, 
dessen Belegung in Bild 3 dargestellt ist. 

Die Bitbelegung im einzelnen: 

Bit sieben und sechs geben die Nummer der aktuellen 
RAM-Bank an, die für die gesamten 64 KByte gilt, die gerade 
bearbeitet werden. Da in der Grundversion des C128 nur die 
Bänke Null und Eins existieren, können wir Bit sieben ver¬ 
nachlässigen. Bit sechs gibt also die Banknummer an. 

Der RAM-Bereich von $0000 bis $3FFF ist, wie schon 
gesagt, immer mit RAM belegt. Dabei ist die Banknummer in 
Bit sechs ausschlaggebend. 

Bei den Bits fünf und vier haben Sie vier verschiedene 
Möglichkeiten. Sind beide gelöscht, so ist im oberen Bereich 
der aktuellen Bank von $C000 bis $FFFF das 
Betriebssystem-ROM (Kernel) des CI28 eingeblendet. Es 
steckt auf der Platine an Position U 35 und enthält 16 KByte 
Speicher. Sind die Bits fünf und vier beide gesetzt, so adres¬ 
siert die MMU im betreffenden Speicherbereich 16 KByte 
RAM der entsprechenden Speicherbank. 

So, und jetzt wird es interessant. Sie haben nämlich jetzt 
noch zwei Bitkombinationen übrig, die die Bits vier und fünf 
annehmen können. Ist Bit fünf gesetzt und Bit vier gelöscht, 
so wird der Expansion-Port des C128 adressiert. Steckt hier¬ 
in nun ein Modul, so wird es in den Speicherbereich $C000 
bis $FFFF eingeblendet und behandelt, als wäre es ein ganz 
»normales« Kernel. 
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Ist der Zustand der Bits fünf und vier hingegen umgekehrt, 
also Bit fünf gelöscht und Bit vier gesetzt, so wird der interne 
Zusatzsteckplatz U 36, der uns im folgenden noch genauer 
interessieren soll, adressiert. Hier kann nun zum Beispiel ein 
völlig neues Betriebssystem integriert sein. 

Wie Sie sehen, haben im C128 sowohl ROM und RAM als 
auch Module und ROMs im Zusatzsteckplatz die gleiche 
Priorität. Es wird lediglich im Konfigurationsregister das ein¬ 
gestellt, was der Anwender gerne als Kombination haben 
möchte. 

Die Bits drei und zwei haben genau die gleiche Funktion 
wie die Bits fünf und vier. Hier wird lediglich der Adreßbereich 
von $8000 bis $BFFF geschaltet, so daß Sie weitere Kombi¬ 
nationsmöglichkeiten haben. Es steht Ihnen also zum Bei¬ 
spiel frei, von $8000 bis $BFFF ein Modul einzuschalten, 
während der Bereich $C000 bis $FFFF RAM enthält. Der 
Speicherbereich von $8000 bis $BFFF wird übrigens nor¬ 
malerweise durch ein ROM repräsentiert, das einen Teil des 
Basic-Interpreters und den TEDMON des CI28 enthält. Es 
ist auf der Platine im Sockel U 34 untergebracht. 

Bit eins ist für den Adreßbereich $4000 bis $7FFF zustän¬ 
dig. Hier können Sie kein Modul oder externes ROM mehr 
einblenden, sondern haben nur noch die Wahl zwischen 
Basic-ROM oder RAM. Bei dem Basic-ROM handelt es sich 
um den ersten Teil des Interpreters, der in einem 16 KByte 
ROM in dem Steckplatz U 33 enthalten ist. 

Bit null des Konfigurationsregisters hat eine Sonderfunk¬ 
tion, die den Adreßbereich $0000 bis $FFFF betrifft. Im 
Bereich von $D000 bis $DFFF kann nicht nur RAM oder 
ROM eingeblendet werden; hier liegen vielmehr auch noch 
die I/O-Bausteine des C128. Soll also ein Zugriff auf VIC, SID, 


CIA oder andere Peripherie erfolgen, so muß von $D000 bis 
$DFFF der Ein-/Ausgabebereich des Computers eingeblen¬ 
det werden. Ist Bit null gelöscht, so ist der I/O-Bereich einge¬ 
blendet, wobei sich gleichzeitig der Speicherbereich infolge 
der ausgefallenen 4 KByte auf 12 KByte vermindert ($C000 
bis $CFFF und $E000 bis $FFFF). Ist das Bit gleich eins, 
so kann auf den zusätzlichen Speicherbereich zugegriffen 
werden. 

Schön und gut, werden Sie jetzt sagen. Man kann also auf 
das ROM im Zusatzsteckplatz (das wir übrigens ab jetzt als 
Funktions-ROM bezeichnen) zugreifen. Toll, aber was bringt 
mir das? 

Auf das Funktions-ROM können Sie nicht nur zugreifen, es 
wird vielmehr vom Betriebssystem des CI28 unterstützt. 
Das »Wie« soll uns dabei nun interessieren. 

Wie bereits erwähnt, werden Module beim CI28 nicht 
hardwaremäßig initialisiert und gestartet. Der CI28 regelt 
das Einschalten eines Moduls sehr viel eleganter. 

Wird ein Reset ausgeführt, so blendet das Betriebssystem 
des Computers mit Hilfe des Konfigurationsregisters nach¬ 
einander vier verschiedene Erweiterungseinheiten in die 
aktuelle Bank ein: Funktions-ROM von $8000 bis $BFFF, 
Funktions-ROM von $C000 bis $FFFF, Expansion-Port von 
$8000 bis $BFFF und Expansion-Port von $C000 bis 
$FFFF. Es wird also jetzt beispielsweise das Funktions-ROM 
bei $8000 eingeblendet. Dann liest das Betriebssystem die 
Speicherstellen $8009, $800A und $800B aus und schaut 
nach, ob dort die Kennung »CBM« enthalten ist. Ist das nicht 
der Fall, so wird der Adreßbereich $C009 bis $C00B unter¬ 
sucht. Findet der CI28 auch hier nichts, prüft er noch die 
gleichen Adreßräume für den Expansion-Port und führt bei 
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Bit Erklärung 

7 höherwertiges Bit der Nummer der Speicherbank 

6 niederwertiges Bit der Nummer der Speicherbank 

5/4 Adreßbereich SCOOO bis SFFFF: 

O/O - Kernel eingeblendet 

0/1- Funktions-ROM eingeblendet 

1/0 - Steckmodul im Expansion-Port eingeblendet 

1/1 - RAM eingeblendet 

3/2 Adreßbereich $8000 bis $BFFF: 

0/0 - Basic-ROM 2 eingeblendet 

0/1 - Funktions-ROM eingeblendet 

1/0 - Steckmodul im Expansion-Port eingeblendet 

1/1 - RAM eingeblendet 

1 Adreßbereich $4000 bis $7FFF: 

0 - Basic-ROM 1 eingeblendet 
1 - RAM eingeblendet 

0 Adreßbereich $D000 bis $DFFF (I/O): 

0 - I/O-Bausteine eingeblendet 
1 - Konfiguration von Bit 4 und 5 eingeblendet 

Bild 3. Die Belegung des Konfigurationsregisters in der MMU des 
C128. Die Grundadresse ist SD500 beziehungsweise $FF00. 

einem Mißerfolg die »normale« Reset-Routine aus, um 
schließlich das Basic 7.0 zu starten. 

Wir haben also auch beim C128 die Abfrage auf eine CBM- 
Kennnung, die wir schon vom C64 her kennen. 

Wie beim C 64, so erfolgt auch beim C128 ein Start des 
entsprechenden Moduls, wenn die Bedingungen dafür erfüllt 
sind. Hier sind jedoch noch ein paar Einzelheiten zu beach¬ 
ten. 

Beim C 64 wird im Falle eines Modulstarts indirekt an die 
Adresse gesprungen, die in $8000 und $8001 gespeichert 
ist. Der C128 springt hingegen direkt in das Modul oder das 
Funktions-ROM. Wurde also die Kennung festgestellt, so 
erfolgt der Sprung an die Grundadresse, bei der das Modul 
oder ROM gefunden wurde. Diese Grundadresse ist je nach 
gefundener Kennung entweder $8000 oder $0000. 

Theoretisch kann mit dem Befehl RTS in das Betriebssy¬ 
stem des CI28 zurückgesprungen werden, da ein JSR in 
das Funktions-ROM stattgefunden hat. Es ist hierbei jedoch 
zu beachten, daß das Funktions-ROM anders adressiert wird 
als das Kernel, so daß das Kernel unter Umständen ausge¬ 
blendet wird, um das Funktions-ROM einzuschalten. Der 
CI28 muß also immer mit sogenannten »long-jumps« arbei¬ 
ten, was einem Umweg über das RAM entspricht. 

Neben der CBM-Kennung im Funktions-ROM ist aber auch 
noch ein anderer Faktor für einen Sprung in das ROM aus¬ 
schlaggebend. Es handelt sich hierbei um ein Byte, das 
immer genau vor der CBM-Kennung zu finden ist, also bei 
$8008, beziehungsweise $0008. 

Steht dieses Byte auf $00, so wird das eingesteckte 
Funktions-ROM oder Modul nicht als Autostart-Modul 
erkannt, und es erfolgt kein Sprung in das eingesteckte ROM 
oder EPROM. 

Steht das Byte hingegen auf $01, so wird das Funktions- 
ROM oder das eingesteckte Modul direkt in der Reset- 
Routine angesprungen und zwar, bevor der gesamte Compu¬ 
ter in einen definierten Zustand versetzt worden ist. Hier hat 
man also sehr früh die Möglichkeit, in den Betrieb des C128 
einzugreifen. 

Steht das Byte in $8008 ($0008) hingegen auf $02 oder 
einem beliebigen anderen Wert bis $FF, so geschieht die 
dritte Möglichkeit der Ansteuerung des Funktions-ROM. 

Das interessante an dem ROM ist nämlich, daß bei Vorhan¬ 
densein der Kennung auch an späterer Stelle der Reset- 
Routine noch ein Einsprung erfolgen kann. 

Wenn Sie Ihren CI28 einschalten und das Diskettenlauf¬ 
werk schon vorher eingeschaltet war, so erfolgt die Meldung 


des Basic 7.0 auf dem Bildschirm. Bevor jedoch das 
»READY.« mit dem Cursor erscheint, erfolgt ein Diskettenzu¬ 
griff, der eine bootfähige Diskette erkennen und gegebenen¬ 
falls ein Programm ledert und automatisch starten soll. 

Betrachtet man sich die Routinen des Betriebssystems 
jedoch genauer, so kann inan erkennen, daß vor dem Disket¬ 
tenzugriff noch einmal die vier möglichen ROM-Variationen 
abgefragt werden, so wie es direkt nach dem Einschalten des 
Computers passiert. 

Hier kann der Programmierer nun ansetzen, wenn er das 
Steuerbyte in $8008 ($C008) mit einem Wert zwischen $02 
und $FF versieht. Wird dieser Wert erkannt, so startet der 
C128 das Zusatz-ROM vor dem Zugriff auf die Diskette, aber 
nachdem bereits das gesamte C128-Computersystem initia¬ 
lisiert wurde. 

Sie haben als Anwender also drei Möglichkeiten: Entweder 
Sie programmieren sich ein eigenes Betriebssystem, das 
eine komplett eigene Reset-Routine und Initialisierung des 
Computers enthält. Dann ist es sinnvoll, wenn Sie direkt am 
Anfang der Reset-Routine in das eigene System springen 
(Byte also auf $01 setzen). Wollen Sie jedoch kein Betriebs¬ 
system entwickeln, sondern nur eigene Maschinenpro¬ 
gramme in ein Modul einbinden, so ist es besser, wenn Sie 
Ihr Programm erst dann starten lassen, wenn sich das 
gesamte Computersystem bereits in einem definierten 
Zustand befindet (Byte-Wert $02 bis $FF). Es ist jedoch 
auch möglich, daß Sie Software besitzen, bei der es ange¬ 
bracht ist, einen Teil in ein Modul und einen Teil auf Diskette 
zu haben. Dann wäre es am günstigsten, wenn Sie den Wert 
$00 in das Steuerbyte schreiben und das Modul mit Ihrem 
eigenen Programm von der Diskette aktiv einschalten und 
anspringen. 

Ein kleiner Fehler im Betriebssystem des C128 wäre viel¬ 
leicht j&cph erwähnenswert: Wenn Sie die Kennung $01 im 
Steuerbyte stehen haben und aus der frühen Initialisierung 
mit RTS wieder in die Reset-Routine des C128 zurücksprin¬ 
gen, so erfolgt der Aufruf des Moduls noch einmal beim 
Basic-Start. Sie bekommen also zwei Autostarts Ihres 
Moduls, da der zweite Start nur noch auf das Steuerbyte 
ungleich Null abfragt und nicht verlangt, daß ein Wert größer 
gleich $02 vorhanden ist. Dieser Fehler wird uns aber in der 
Regel nicht stören, da ein Rücksprung aus dem Modul in das 
Betriebssystem in den wenigsten Anwendungsfällen sinnvoll 
ist. 

Wenn Sie ein EPROM mit 16 KByte Speicherkapazität in 
den Sockel U 36 einstecken, haben Sie natürlich im Bereich 
ab $8000 und ab $C000 den gleichen Inhalt bei der Initiali¬ 
sierung. Sie können sich also hier auswählen, ob Sie den 
$8000 bis $BFFF- oder den $C000 bis $FFFF-Bereich als 
Modulbereich anwählen. In den meisten Fällen wird $8000 
bis $BFFF der günstigere Bereich sein, da man dann das 
Betriebssystem des Computers ab $C000 einblenden und 
aus dem Modul heraus sehr einfach anspringen kann. 

Haben Sie hingegen ein 32-KByte-EPROM im Sockel 
stecken, so muß natürlich der gesamte Bereich von $8000 
bis $FFFF auf Funktions-ROM geschaltet werden, um einen 
Zugriff zu ermöglichen. Ob man dann die Startadresse bei 
$8000 oder bei $C000 liegen hat, ist nur eine Frage des 
eigenen Geschmacks und hat für den Betrieb des EPROMs 
keine Bedeutung. 

Eine mächtige Angelegenheit also, das Funktions-ROM. 
Sie können von der eigenen Programmiersprache bis hin zu 
eingebauten Kopier- oder DFÜ-Systemen alles realisieren, 
was Sie wollen. Und das alles steht auf Wunsch, direkt nach 
dem Einschalten des Computers, ohne einen Verlust des 
Original-Betriebssystems zur Verfügung. Versuchen Sie es 
doch einmal, und schicken Sie uns Ihre eigenen Betriebssy¬ 
steme für den C128. Wir sind gespannt auf die ersten Pro¬ 
gramme für den C128, die keine RAMs mehr benötigen.(ks) 
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IEEE-Bus für den C128 


Wollen Sie professionelle Peripheriegeräte an 
Ihren Computer anschließen? Hier finden Sie die 
notwendige Bauanleitung dafür. Zusätzlich wer¬ 
den eine ganze Menge Extras geboten. 

W ozu braucht man überhaupt einen IEEE-488-Bus am 
CI28? Nun, die Antwort ist sehr einfach. Über ein 
paralleles lEEE-Bus-Modul können Sie die Drucker 
und die Diskettenlaufwerke mit erheblich höherer Speicher¬ 
kapazität aus der Commodore 4000er- und 8000er-Serie 
anschließen. Interessant ist vor allem das Einzellaufwerk SFD 
1001 mit einer Speicherkapazität von 1 MByte und die Dop- 
pelfloppy CBM 8250 LP mit 2 x 1 MByte Speicherkapazität. 
Besonders bei den Laufwerken findet man häufig günstige 
Angebote (siehe Anzeigenteil). 

Schnellere Floppy 


Besonders das Floppylaufwerk SFD 1001 weist etliche Vor¬ 
züge gegenüber den Laufwerken 1571 und 1541 auf. Im ein¬ 
zelnen sind diese: 

1. Das Laufwerk 1571 emuliert im C64-Modus des C 128die 
Floppystation 1541 - zumindest, was die Geschwindigkeit 
angeht. Eine SFD 1001 ist beim Lesen aber fast sechsmal 
schneller, beim Schreiben etwa dreimal so schnell wie die 
1541 und doppelt so schnell wie die 1571 im C128-Modus. 
Auch sequentielle und relative Dateien werden entspre¬ 
chend schneller bearbeitet. Angenehm bemerkbar macht 
sich die Geschwindigkeitssteigerung auch im CP/M-Betrieb, 
bei dem häufig auf Diskette zugegriffen wird. 

2. Die Speicherkapazität der SFD 1001 ist gegenüber der 
1541 sechsmal größer. Gegenüber der 1571 beträgt sie 
immer noch das dreifache. Es treten auch keine Probleme mit 
den Diskettenformaten 1541/einseitig und 1571/doppelsei¬ 
tig mehr auf. 

Wenn Sie eine 1541 am C12 8 betreiben, können Sie diese 
mit Hilfe der in Ausgabe 1/86 vorgestellten lEEE-Platine auf 
den parallelen Übertragungsstandard Umrüsten. Die Vorteile 
der höheren Übertragungsge schwindigkeit können Sie im 
C64-Modus, im C 128-Modus und unter CP/M nutzen. 

Ein Modul und zwei EPROMs 


Um den IEEE-488-Busan Ihrem C 128 betreiben zu können, 
benötigen Sie ein Hardware-Modul (Bild 1) und zwei 
Betriebssystem-EPROMs. 

Das eine EPROM des Typs 27128 beinhaltet das Basic V2 
und das modifizierte Betriebssystem für den C 64-Modus. 
Auf der Programmservice-Diskette zu dieser Ausgabe ist das 
zum Brennen des EPROMs notwendige Programm enthal¬ 
ten. Sie finden es dort unter dem Namen »IEEE KERN 64«. 
Im Bild 2 sehen Sie den Platinenausschnitt mit den beiden 
Betriebssystem-ROMs. Dieses EPROM können Sie direkt an 
Stelle des mit »2« gekennzeichneten ROMs einsetzen. Ein 
Adaptersockel ist dabei nicht notwendig. 

Das zweite EPROM, ebenfalls ein 27128-Typ mit einer 
Zugriffszeile von 250 ns, ersetzt das mit »1« gekennzeich¬ 
nete ROM (Bild 2). Es beinhaltet das neue Betriebssystem für 
den C 128-Modus. Das notwendige Programm finden Sie 
ebenfalls auf der Programmservice-Diskette unter »IEEE 
KERN 128«. 



Bild 1. Das IEEE-488-Modul 


Die beiden EPROMs für die Betriebssysteme sind auf der 
Stück»^ e (Tabelle 1) nicht mit aufgeführt. Sie enthält nur die 
Bauteile für das Hardware-Modul. Auf dieses Modul wollen 
wir jetzt auch näher eingehen. 

Die Schaltung 


Für eine parallele Datenübertragung nach der lEEE-Norm 
benötigen Sie eine kleine Platine für den Expansion-Port (Bild 
1). Die Schaltung finden Sie im Bild 3. 

Der wichtigste Baustein (IC2) ist ein »Programmable Peri- 
pheral Interface«, abgekürzt PPI. Dieser Baustein des Typs 
/*PD8255AC kann ohne weiteres mit 2 Megahertz betrieben 
werden. Geschwindigkeitsprobleme wird es also keine 
geben. Da IC2 jedoch nicht zur Familie der 65xx-Bausteine 
gehört, ist eine Anpassung der Steuersignale notwendig. 
Dies erfolgt über die vier Gatter des 74LS00 (IC1). 

Die beiden ICs SN75160 (IC3) und SN75161 (IC4) sind 
Treiber-Bausteine mit integriertem Widerstandsnetzwerk, 
wie es nach der lEEE-Norm verlangt wird. 

Mit dem 8fach DIL-Schalter wird die Schnittstelle auf Ihre 
Gerätekonfiguration angepaßt. 

Kommen wir aber nochmals zum I/O-Baustein /iPD8255. 
Er wird über den für die Erweiterungen I/O 1 vorgesehenen 
Adreßbereich SDEOO bis SDEFF angesprochen. Sie können 
das Modul aber auch auf den Erweiterungsbereich I/O 2 
(SDFOO bis SDFFF) verlegen, indem Sie die Brückenverbin¬ 
dung rechts neben den DIP-Schaltern (Bild 4) auftrennen und 
umlöten. 

Von dem neuen Betriebssystem wird allerdings der Bereich 
I/O 1 angesprochen. Die Software spricht die Register von 
$DE40 bis SDE43 für Read-Funktionen und die Register von 
$DE48 bis $DE4B für Write-Funktionen an. 

Der /*PD8255 besitzt insgesamt drei 8 Bit breite Ports (PA, 
PB, PC). Im Bild 5 ist der /*PD8255 nochmals mit allen Pin- 
Belegungen abgebildet. Welche der I/O-Anschlüsse als Da- 
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Um den IEEE-488-Bus betrei¬ 
ben zu können, müssen Sie 
die beiden Betriebssysteme 
herausnehmen und EPROMs 
mit neuen Betriebssystemen 
einsetzen. Die Kerben der 
EPROMs müssen jeweils nach 
unten zeigen. 


C128-Betriebssystem 


C 64-Betriebssystem 


Bild 2. Platinenausschnitt vom C 


ten- oder Steuerleitungen verwendet werden und welche mit 
den DIP-Schaltern geschaltet werden, das finden Sie in der 
Tabelle 2. 

Mit den Leitungen TE und DC der Bus-Treiber (IC3, IC4) 
wird die Datenrichtung und der Zustand des Computers 
(Controller/Talker/Listener) festgelegt. 

Tips für den Aufbau 


Um die Schaltung aufzubauen, brauchen Sie eine doppelsei¬ 
tige Platine. Die Platinenlayouts für beide Seiten finden Sie in 
den Bildern 6 und 7. Die Abmessungen der Platine betragen 
59 x 75 mm. Für die Herstellung doppelseitiger Platinen 
empfiehlt es sich, Folien vom Layout herzustellen, die beiden 
Folien genau übereinander zu legen und mit Tesa-Film zu 
einer Art Tasche zusammenzukleben. Stecken Sie dann eine 
Piatine mit Fotoschichten in diese Tasche, lassen Sie diese 
auf der offenen Taschenseite überstehen und kleben Sie die 
Platine mit Tesa-Film an der Tasche fest. Nun können Sie die 
Plaiine auf beiden Seiten belichten. 

An der lEEE-Bus-Seite muß die Platine später auf die Maße 
des 24poligen Platinensteckers zurechtgesägt werden. 
Achten Sie auch auf die notwendigen Schlitze. Sie liegen 
anders als am User-Port! Im Layout (Bestückungsseite) sind 
kleine, halbkreisförmige Markierungen vorhanden, wo die 
Schlitze gesägt werden müssen. 


Die Durchkontaktierung erfolgt durch doppelseitiges Ver¬ 
löten der IC-Sockel. Gedrehte Sockelbeinchen ohne Kunst¬ 
stoffrahmen (Carrier-Fassungen), wie sie auf dem Bild 1 zu 
sehen sind, erleichtern das Löten auf der Bestückungsseite. 
Sie werden mit einem »Blech-IC« als Träger verkauft. Weitere 
Durchkontaktierungen sind nicht notwendig. 


So schließen Sie Geräte an 


An der Platine sind zwei Anschlüsse vorhanden. Mit der 
44poligen Seite wird die Platine direkt in den Expansion-Port 
gesteckt. Die Bestückungsseite zeigt dabei nach oben. Den 
Commodore-IEEE-488-Bus bildet der 24polige Anschluß 
mit den beiden Schlitzen (siehe Bild 1). Über ein Commo- 
dore-IEEE-488-Bus-Kabel können Sie die Peripheriegeräte 
der Serien 4000 und 8000 anschließen. Eine Gegenüber¬ 
stellung der Pinbelegung des Commodore-IEEE-488-An- 
schlusses und des 24poligen IEEE-488-Normsteckers fin¬ 
den Sie in der Tabelle 3. 

Daten seriell und parallel 


Der Datenverkehr mit den Peripheriegeräten kann seriell und 
parallel erfolgen. Unter der gleichen Gerätenummer kann ein 
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Bild 3. Schaltplan für das IEEE-488-Modul 


Gerät seriell angesprochen werden und ein zweites parallel. 
Auf diese Weise ist es möglich, zwei Floppylaufwerke zu 
betreiben, ohne die Gerätenummer zu ändern. 

Die Art des Zugriffs (seriell oder parallel) können Sie entwe¬ 
der softwaremäßig über ein Register oder mit den DIP- 
Schaltern bestimmen. Mit dem DIP-Schalter 8 wird eine der 
beiden Varianten vorgegeben. Ein Wechsel der Zugriffsart ist 
auch während dem Betrieb möglich. 

Die Übersicht, was mit welchem Schalter eingestellt wird, 
finden Sie in der Tabelle 4 unter »Switch«. In der Mitte ist eine 
gängige Schalterkombination abgebildet. Die Bedeutung der 
einzelnen Schalter wollen wir Ihnen aber auch noch genauer 
erklären. 

Schalter 1 invertiert die Funktion der Taste < CBM > nach 
dem Einschalten und nach einem Reset. Setzen Sie Schalter 
1 auf »ON«, so gelangen Sie nach dem Einschalten in den C 
64-Modus, ohne die Taste <CBM> zu drücken. Haben Sie 
diese Taste gedrückt, meldet sich der Computer im C 128- 
Modus. 

Schalter 2 legt die Farben des 40-Zeichen-Bildschirms 
fest. Im C 128-Modus können Sie zwischen schwarz/weiß 
und blau/weiß wählen. Im C 64-Modus stehen die Kombina¬ 
tionen schwarz/grau oder blau/grau zur Verfügung. 

Ist Schalter 3 auf »ON« gestellt, erfolgt die Datenausgabe 
für die Gerätenummer 4 (Drucker) über eine Centronics- 
Schnittstelle am User-Port. Die FLAG-Leitung wird dabei als 
»Acknowledge« und die PA2-Leitung als »Strobe« verwendet. 
Wenn Sie im OPEN-Befehl die Sekundäradresse 0 wählen, 
werden alle Zeichen im »CBM-ASCII-Code« ohne eine Code¬ 
wandlung ausgegeben. Mit der Sekundäradresse 7 wird eine 


Wandlung der Klein-/Großschrift durchgeführt. Die Code¬ 
wandlung erfolgt bis zum Zeichen CHR$(95). 

Steht der Schalter 3 auf »OFF«, so wird über die Geräte¬ 
nummer 4 nicht der User-Port angesprochen, sondern der 
serielle oder parallele Bus. 

Die Schalter 4 bis 7 bestimmen die Art des Zugriffs für die 
Gerätenummern 4, 5, 8 und 9. Dabei bedeutet »OFF« seriell 
und »ON« parallel. 

Der Schalter 8 trägt die Bezeichnung »Request Switches?« 
(Schalter abfragen?). Im Zustand »ON« werden die übrigen 
Schalter im Betrieb abgefragt. Im Zustand »OFF« werden die 
entsprechenden Bits des Registers SDDOC abgefragt. 

Einstellung per Software 


Um eine softwaremäßige Einstellung zu erreichen, wird das 
serielle Schieberegister (SDDOC) des CIA-Bausteins 2 
benutzt. Die Bedeutung der einzelnen Bits finden Sie als 
Übersicht ebenfalls in der Tabelle 4. In der Mitte dieses Tabel¬ 
lenabschnittes ist wiederum die gängigste Bit-Kombination 
angegeben. Wie bei den Schaltern wollen wir Ihnen auch hier 
die einzelnen Bits noch einmal genau erklären. 

Die Bits 0, 1 und 2 bestimmen die Art des Zugriffs für die 
Gerätenummern 4, 8 und 9. Bei gelöschtem Bit wird der 
serielle Bus, bei gesetztem Bit der parallele Bus verwendet. 

Bit 3 bestimmt, ob die Gerätenummer 4, die Centro- 
nics-Schnittstelle, angesprochen wird. Bei gesetztem Bit 
läuft die Datenausgabe über den User-Port (Centronics). Bei 
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gelöschtem Bit 3 entscheidet das Bit 0 über die Art der Aus¬ 
gabe. Bit 3 hat also Vorrang vor Bit 0. 

Mit Bit 4 können Sie das Modul als »nicht vorhanden« (Bus 
not available) schalten. Dazu braucht nur Bit 4 gelöscht wer¬ 
den. Im Normalfall ist das Bit bei eingestecktem Modul 
gesetzt. Nach dem Einschalten wird dieses Bit überprüft, 
bevor die Schalter abgefragt werden. Es hat also die höchste 
Priorität. Fehlt das Modul nach dem Einschalten, so werden 
die Bits 0 bis 3 vom Betriebssystem gelöscht. Bit 4 kann auch 
benutzt werden, um eine Schalterabfrage softwaremäßig zu 
unterdrücken. 

Die Bits 5 bis 7 dürfen Sie nicht benutzen, da sie vom 
Betriebssystem verwendet werden. Aus diesem Grund soll¬ 
ten Sie die einzelnen Bits (0 bis 4) von Basic aus mit folgen¬ 
dem Befehl setzen: 

POKE56588, (PEEK(56588) OR X) 

Anstelle X werden je nach Bit die Werte 1, 2, 4, 8 oder 16 
eingesetzt. 

Die Bedeutung von Bit 5 wollen wir Ihnen aber auch erläu¬ 
tern. Das Floppylaufwerk SFD 1001 reagiert beim Befehl »I« 
(Initialisierung der Diskette) mit einer Fehlermeldung: READ 
ERROR auf Drive 1. Dies liegt daran, daß für die SFD 1001 
das DOS 2.7 der Doppelfloppy 8250 nahezu unverändert 
übernommen wurde. Die 8250 initialisiert bei dem Befehl »I« 
beide Laufwerke (Drive 0 und 1). Will man ein einzelnes Lauf¬ 
werk initialisieren, so ist der entsprechende Befehl »10« oder 
»II«. Nur bei dem korrekten Befehl »10« gibt die SFD 1001 
keine Fehlermeldung aus. Viele Programme verwenden aber 
den Sparbefehl »I« anstatt »10« und fragen daraufhin den Feh¬ 
lerkanal ab. Aus diesem Grund sendet das Betriebssystem 
bei dem Befehl »I« auch die dazugehörige »0« hinterher. Ein 
»Abstürzen« eines Programms aufgrund dieses Fehlers wird 


so vermieden. Wollen Sie dennoch beide Laufwerke gleich¬ 
zeitig initialisieren, dann verwenden Sie dazu bitte den Befehl 
»I:*. 

Am meisten wird wohl die Umschaltung der Zugriffsart 
seriell/parallel für die Gerätenummer 8 benötigt. Hier existiert 
neben dem Einstellen des Schalters 4 oder dem Setzen und 
Löschen des zweiten Bits eine dritte Möglichkeit. Durch 
gleichzeitiges Drücken der Tasten <CTRL + RETURN > 
wird das Bit 4 auf Null gesetzt und Bit 2 umgekehrt. Dies hat 
folgende Wirkung: Ein gelöschtes Bit 4 erlaubt die Abfrage 
der internen Bits anstelle der Schalter. Das Bit 2 (zuständig für 
die Gerätenummer 8) wird umgekehrt und damit der Zugriff 
von seriell auf parallel (oder umgekehrt) umgeschaltet. Diese 
Abfrage ist in der INPUT-Routine eingebunden. Sie können 
also während eines INPUT-Befehls die Übertragungsart für 
die Gerätenummer 8 ändern. Eine nützliche Hilfe. 

Die Geräteadressen 10 und 11 bewirken übrigens stets 
eine serielle Übertragung, während 12 bis 15 eine parallele 
Übertragung bewirken. 


Betriebssystem verbessert 


Die Treibersoftware für den IEEE-488-Bus ist sowohl im 
C 64- wie im C128-Betriebssystem eingebunden. Zu diesem 
Zweck mußten die Kassettenroutinen entfernt werden. Die 
RS232-Treiberroutinen unter der Gerätenummer 2 bleiben 
erhalten. 

Sie sollten allerdings nicht mit Übertragungsraten über 
1200 Bit/s arbeiten, wenn Sie gleichzeitig den parallelen Bus 
benutzen. 
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C 128 


HARDWARE 


Stückliste 

Integrierte Schaltkreise 

Widerstände 

1 74LS00; IC 1 

1 *<PD 8255 AC; IC 2 

1 Array 8 x 10 K; RN 1 

1 SN75160; IC 3 

Sonstiges 

1 SN75161; IC 4 

1 8fach DIP-Schalter; S1—S8 

1 IC-Fassung 40polig 

Kondensatoren 

2 IC-Fassung 20polig 

1 x 15 /tF, Tantal: CI 

2 x 100 nF; C2, C3 

1 IC-Fassung 14polig 


Tabelle 1. Die notwendigen Teile für das IEEE-488-Modul 


Zuordnung der I/O-Leitungen 

Port A 

IEEE-488- 

Port C 

Steuerlei- 


Datenleitung 


tung/Schalter 

PAO 

dich 

PCO 

SW 8 

PA1 

DI02 

PCI 

SRQ 

PA2 

DI03 

PC2 

DAV 

PA3 

DI04 

PC3 

EOI 

PA4 

DI05 

PC4 

SW 7 

PA 5 

DI06 

PC 5 

SW 6 

PA6 

DI07 

PC6 

NRFD 

PA7 

DI08 

PC7 

NDAC 

Port B 

Steuerlei- 




tung/Schalter 



PBO 

ATN 



PB1 

DC 



PB2 

TE 


S46R ( 

PB3 

SW 1 



PB4 

SW 2 



PB5 

SW 3 



PB6 

SW 4 



PB7 

SW 5 




Tabelle 2. Die Schalter und die Steuerleitungen an den Ports 
des /tPD 8255 


Im einzelnen sind im C 64-Modus folgende Verbesserun¬ 
gen implementiert: 

1. <CTRL+* > bewirkt ein »OLD« für ein Basic-Programm 
nach einem NEW oder Reset. 

2. <CTRL+DEL> löscht von der aktuellen Cursor-Position 
den Rest der Zeile. 

3. Die linke <SHIFT>-Taste oder die Taste <SHIFTLOCK> 
bewirken eine Pausenfunktion für das Bildschirm-Scrolling. 
Die Ausgabe wird gestoppt, wenn eine neue Zeile am unteren 
Rand aufgebaut werden soll. 

4. Die im Betriebssystem voreingestellte Gerätenummer für 
»LOAD« und »SAVE« ist von 1,1 (Kassette) auf 8,1 (Floppy) 
umgestellt worden. Davon unabhängig wird das Inhaltsver¬ 
zeichnis mit 8,0 geladen. 

5. Die Programmkennzeichnung »PRG« in einem Directo- 
ry-Listing auf dem Bildschirm muß bei einem LOAD-Befehl 
nicht mehr beachtet werden. Es genügt, vor den Programm¬ 
namen ein »LOAD« zu schreiben und < RETURN > zu 
drücken. 

6. Die Default-Nummer für den OPEN-Befehl ist auf x,8,15 
gesetzt. Zum Öffnen des Befehlkanals der Floppystation 
genügt jetzt ein »OPEN1«. 

7. Die Repeat-Funktion für die Tastatur ist eingeschaltet. 

8. Die Tastenkombination <CTRL+*- > schaltet den Quote- 
Mode (Gänsefüßchenmodus) ab. So können Sie dem Quote- 
Mode entkommen, ohne die Cursor-Position zu ändern. 


Steckerbelegung CBM-IEEE und 


Standard-IEEE 

Kontaktbe- 

Standard-IEEE 

Bezeichnung 

nennung CBM 


des Pins 

1 

1 

DICH 

2 

2 

DI02 

Schlitz 



3 

3 

DI03 

4 

4 

DI04 

5 

5 

EOI 

6 

6 

DAV 

7 

7 

NRFD 

8 

8 

NDAC 

9 

9 

IFC 

Schlitz 



10 

10 

SRQ 

11 

11 

ATN 

12 

12 

GND 

A • 

13 

DI05 

B 

14 

DI06 

Schlitz 



C 

15 

DI07 

D 

16 

DI08 

E 

17 

REN 

F 

18 

GND (DAV) 

H 

19 

GND (NRFD) 

J 

20 

GND (NDAC) 

K 

21 

GND (IFC) 

Schlitz 



L 

22 

GND (SRQ) 

M 

23 

GND (ATN) 

N 

24 

GND (DI01-8) 


Tabelle 3. Vergleich der Steckerbelegung zwischen 
Commodore-IEEE und Standard-IEEE 



Tabelle 4. Die Belegung des Steuerregisters und der DIP- 
Schalter 


Tastencodes im C 64-Modus 

ESC 

liefert 

CHR$(27) 

TAB 

liefert 

CHR$(09) 

ALT 

liefert 

CHR$(14) 

HELP 

liefert 

CHR$(08) 

LINE-FEED 

liefert 

CHR$(10) 

NO SCROLL 

liefert 

CHR$(03) 


Tabelle 5. Die Belegung der C 128-Tasten im C 64-Modus 
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• Kompletter 
Sehaltplan 

der Floppy 1541 

in der 64'er-Ausgabe V V 

• 2000 Mark 
zu gewinnen! 

ln unserem Wettbewerb: 
»Die schönste Grafik« 


■ Mit dem Listing des Monats »3D- 
Graf ik-Master« sind dreidimensionale Ob¬ 
jekte auf dem C 64 kein Problem. ■ Aus¬ 
führlicher Bericht von unserem Besuch der 
PCW-Messe in London mit den neuesten 
Trends und aktuellsten Produkten. ■ Im 
Einsteiger-Teil ausführliche Grundlagen für 
Grafikprogrammierung/Lexikon der Fach- 
begriffe/Literatur, die Anfänger unbe¬ 
dingt brauchen/Tips & THcks von Profis für 
Anfänger. ■ Haitiware-Bastelei: stereo¬ 
klang mit 2-Sound Chips. So verdoppeln 
Sie die stimmgewalt des C 64. ■ Drucker 
im Tost: Epson-LX86. ■ Anwendung des 
Monats: Deutsche Rechtschreibhilfe für Vi- 
zawrite. ■ Tips zu Giga-CAD, Geos und 
Master-Text. 

■ Den großen Mailbox4forgleichstest 
der Mailboxen in Deutschland. ■ Wir stel¬ 
len die interessantesten Mailboxen Ameri¬ 
kas vor. ■ Sie erhalten eine ausführliche 
Marktübersicht von Akustikkopplern und 
Moden. ■ Akustikkoppler im Test: Was Sie 
leisten. ■ Datenfernübertragung: aber 
wie? ■ Das Listing des Monats: Der Sound¬ 
monitor. ■ Anwendung des Monats: Ein 
Sprachdigitizer zum Nachbauen. ■ Tips 
und Tricks zum Mastertext »Vizawrite« und 
»Glos« ■ Der große Graf ikpregramm-Test. 
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Gutschein 

FÜR EIN KOSTENLOSES PROBEEXEMPLAR DES 64'er-MAGAZINS 

JA, Ich möchte »64'er«, das Magazin für Computorfans, kennonlemen. 

Senden Sie mir bitte die aktuellste Ausgabe kostenlos als Probeexemplar. Wenn mir »64'er« gefällt und ich 
es regelmäßig weiterbeziehen möchte, brauche ich nichts zu tun: Ich erhalte *64'er« dann regelmäßig frei 
Haus per Post und bezahle pro Jahr nur DM 78,— (Ausland auf Anfrage}. 


\forname, Name 


Straße 


PLZ, Ort 


Datum 


1. Unterschrift 


Mir ist bekannt, daß ich diese Bestellung innerhalb von 8 Tagen bei der Bestelladresse widerrufen kann 
und bestätige dies durch meine zweite Unterschrift. Zur Wahrung der Frist genügt die rechtzeitige Absendung 
des Widerrufs. 


Dotum 


2. Unterschrift 


Gutschein ausfüllen, ausschneiden, in ein Kuvert stecken und absenden an; 
Markt&Technik Verlag Aktiengesellschaft, Vertrieb, Postfach 1304, 8013 Haar 
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HARDWARE 
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Dieses IC ist das Herz 
der Schaltung. Es ist 
ein programmierbarer 
Interface-Baustein, der 
mit 2 MHz betrieben 
werden kann. 
Geschwindigkeitspro¬ 
bleme wird es daher 
nicht geben. 


Bild 4. Bestückungsplan für das IEEE-488-Modul 


Bild 5. Die Anschlüsse des Bausteins /tPD 8255 



Bild 6. Das Layout der Bestückungsseite 



Bild 7. Das Layout der Lötseite 



Bild 8. Der Commodore 128 D mit einem Doppellaufwerk 
8250 LP 


9. Die Tastenfolge < CBM+RUN/STOP > ergibt ein »RUN:« 

10. <SHIFT+RUN/STOP> bewirkt das Laden und Starten 
des ersten Programms vom Diskettenlaufwerk 
(LOAD"0:*":RUN). 

11. Die Tastenkombination <F1 + F3+DEL> unterdrückt die 
Ausführung des Autostart-Codes »cbm80« beim Reset oder 
Einschalten. Reset-feste Programme können Sie so verlas¬ 
sen. 

12. <F1+DEL> wandelt beim Reset den Autostart-Code 
»cbm80« im RAM bei $8004 bis $8008 in »ibm80« um. Im 
Gegensatz zur Methode <F1+F3+DEL> ist danach ein NMI- 
Warmstart des Computers (< RUN/STOP+RESTORE >) 
möglich. 

13. Die neuen Cursor-Steuertasten derC 128-Tastatur funk¬ 
tionieren auch im C 64-Modus. 

14. Der Zehnerblock des C 128 ist auch im C 64-Modus 
zugänglich. Die Tasten liefern den gleichen Code wie die ent¬ 
sprechenden Tasten der normalen C 64-Tastatur. Dies gilt 
auch im SHIFT-Modus. 

15. Die Funktion der zusätzlichen Tasten des C 128 für den C 
64-Modus können Sie der Tabelle 5 entnehmen. Die übrigen 
Zusatztasten bleiben ohne Funktion. 

In Bild 8 sehen Sie den C 128 D gemeinsam mit einem Dop¬ 
pellaufwerk 8250 LP im Einsatz. Alle, die sich den Selbstbau 
nicht Zutrauen, können das fertige lEEE-lnterface auch bei 
Roßmöller, Maxstraße 50 - 52, 5300 Bonn 1, für 198 Mark 
erhalten. 
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HARDWARETEST 


C 128 


Formel C 
für den C128 

Floppy-Speeder, Maschinensprache-Monitor, 
Grafik- und Toolkit-Befehle - dies alles bietet 
Ihnen Formel C in einem einzigen Steckmodul. 

V iele Erweiterungen für den CI28 im C64-Modus sind 
in ihren Leistungen mehr oder weniger beschränkt, da 
sie nur auf einen bestimmten Anwendungsbereich zu¬ 
geschnitten sind. Hier bietet »Formel C« (Bild 1) eine reizvolle 
Alternative. 

Beim Arbeiten im C 64-Modus ist es immer von Vorteil, ver¬ 
schiedene Toolkit-Funktionen wie zum Beispiel AUTO, 
RENUMBER, FIND oder OLD zur Verfügung zu haben. For¬ 
mel C ist aber wesentlich mehr als nur eine Befehlserweite¬ 
rung für den C 64-Modus. Denn hier wurden außer Toolkit- 
Funktionen (siehe Tabelle) zur Unterstützung der Program¬ 
mierung noch ein Maschinensprache-Monitor, ein Disketten- 
Monitor, ein komfortabler 2-Pass-Assembler und einige 
schnelle Grafik-Befehle eingebaut. Erwähnenswert ist der im 
Modul integrierte Floppy-Beschleuniger, der allerdings nur 
mit dem Diskettenlaufwerk 1641 zusammenarbeitet. Möchte 
man dieses Modul in einen C128D einbauen, ist das interne 
Laufwerk 1571 abzuschalten und eine 1541 extern anzu¬ 
schließen. Dafür sind dann aber auch die Geschwindigkeiten 
bei LOAD, SAVE und VERIFY etwa 16mal schneller als bei 
einer nicht umgerüsteten 1541. Und das in allen drei Modi 
(C64, CI28 und CP/M). Ein Backup- und Filecopy- 
Programm sowie eine gegen Aufpreis erhältliche Centronics- 
Schnittstelle runden das Bild von Formel C angenehm ab. 

Die für diese Funktionen benötigte Software ist in einem 
16-KByte- und einem 32-KByte-EPROM untergebracht, zwi¬ 
schen denen ständig hin- und hergeschaltet wird. 

Folgende Funktionen können durch Druck auf bestimmte 
Tasten beim Einschalten erzielt werden: 

Keine Taste: Der Computer verhält sich so, als ob kein 
Modul eingesteckt wäre. 

<CTRL>: Der Computer springt in den C 64-Modus. Mit 
dem Befehl OFF kann nun der normale C 64-Modus ohne 
Formel C-Unterstützung gewählt werden. 

< — >: Eine eingelegte CP/M-Diskette bootet mit erhöhter 
Geschwindigkeit (5fach). Nach Abschluß des Bootens führt 
das Diskettenlaufwerk CP/M-Operationen mit 15facher 
Geschwindigkeit aus. 



Bild 1. Formel C - eine gelungene Erweiterung für den 
C 64-Modus des C128 


Besonderheiten im CP/M-Modus: 

- Der Befehl BOOT führt in jedem Fall zum Laden des 
CP/M-Systems mit normaler Geschwindigkeit. Das 
beschleunigte Arbeiten ist nur durch einen Reset mit 
gedrückter < CTRL >-Taste zu erreichen. 

- Im CP/M-Modus steht eine schnelle Formatier-Routine 
zur Verfügung. 

- Komplette CP/M-Disketten können im C 64-Modus mit 
dem Befehl BACKUP in kurzer Zeit kopiert werden. 

- Mit einem zweiten Floppy-Kabel lassen sich zwei Lauf¬ 
werke unter CP/M betreiben. 

Floppy-Beschleuniger eingebaut 


Der Floppy-Beschleuniger ist an einem Kabel erkennbar, das 
aus dem Modul herausgeführt ist. Der Adaptersockel ist in 
das Laufwerk einzubauen. Dort muß lediglich ein Chip auf der 
Platine herausgezogen und der Sockel eingesetzt werden. 
Weitere Umbauarbeiten gibt es nicht. Die Lade- und Spei¬ 
chergeschwindigkeit steigt damit um den Faktor 6 bis 8. Ver¬ 
wendet man aber speziell formatierte Disketten, läßt sich 
diese Geschwindigkeit auf das 13- bis 16fache steigern. 


Hier nun die Leistungen in einer tabellarischen Übersicht: 

Floppyfunktlonen 


LOAD 


SAVE 

in allen drei Modi 

VERIFY 

16mal schneller 

Formatieren 

etwa 18 Sekunden 

Backup 

etwa 80 Sekunden 

0”* Befehle (C 64-Modus) 

DLOAD 


DVERIFY 


DSAVE 


DAPPEND 

Diskettenbezogene Befehle 

DIR 

Anzeige des Disketten-Directories ohne 


Programmverlust 

LRUN 

Laden und Starten eines Programms 

REPLACE 

Korrigiertes Überschreiben eines Programms 


auf Diskette 

STATUS 

Anzeige des Laufwerks-Status 

HEADER 

Formatieren 

BACKUP 

Kopieren einer ganzen Diskette 

SEND 

Befehle an Laufwerk senden 

FILECOPY 

Kopieren einzelner Dateien 

Toolkit-Funktionen (C64-Modus) 

AUTO 

Automatische Zellennummern-Vorgabe 

RENUMBER 

Umnumerierung eines Basic-Programms 

DELETE 

Löschen von Programm-Teilbereichen 

DEZ 

Umrechnung 

HEX 

verschiedener Zahlensysteme 

FIND 

Findet Zeichenketten oder Befehle 

JUMP 

Führt Maschinenprogramme aus 

OLD 

Retten eines gelöschten Programms 

RESET 

Reset mit Modul-Neustart 

LPRINT 

Ausgabe 

LUST 

auf Drucker 

HARDCOPY 

über volle DIN-A4-Breite 

HELP 

Übersicht über die neuen Befehle 

OFF 

Reset ohne Modul-Neustart 

TKITOFF 

Abschalten der Befehlserweiterung 

Maschinensprache-Monitor 

llegale Opcodes 


Memory-Dump 

Hex oder ASCII 

Disassemble 

Disassemblieren 


Tabelle. Formel 64 im Überblick 
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HARDWARETEST 


Diese speziell formatierten Disketten können aber auch ohne 
Modul gelesen werden. Auch der Förmatierungsvorgang 
selbst hat sich bezüglich der Geschwindigkeit verbessert. 
Gegenüber 70 Sekunden beim Original-Betriebssystem ist 
eine Diskette nun in etwa 18 Sekunden formatiert. Kritische 
Programme wie Textomat plus oder Summer Games II liefen 
einwandfrei. 

Formel C hat für Basic- oder Maschinensprache- 
Programmierer im C64-Modus einiges zu bieten. Es existie¬ 
ren Befehle wie RENUMBER zum Umnumerieren von Basic- 
Programmen genauso wie FIND, um einzelne Zeichenfolgen 
zu suchen. HCOPY erzeugt eine Hardcopy des Bildschirms, 
egal, ob vom Text- oder Grafikbild. Allerdings nur auf einem 
Epson-kompatiblen Drucker. Die Hardcopy wird über das 
gesamte Querformat einer DIN-A4-Seite gedruckt. Des wei¬ 
teren gibt es Kommandos wie LLIST oder LPRINT zum einfa¬ 
chen Ansteuern eines Druckers. Der Befehl DELETE löscht 
ganze Bereiche eines Programms. Abgerundet werden diese 
Toolkit-Funktionen durch Befehle wie OLD, HELP, HEX und 
DEZ. 

Für Assemblerfreaks ist ein komfortabler Monitor mit inte¬ 
griertem Diskmonitor eingebaut. Vorhanden sind Befehle wie 
MEMORY, ASSEMBLE, DISASSEMBLE, FIND und VERIFY. 


Interessant ist der vorhandene Einzelschrittmodus, der es 
erlaubt, den Ablauf von Maschinenroutinen genau zu beob¬ 
achten. Außergewöhnlich ist die Unterstützung von illegalen 
Opcodes des 8502-Prozessors. 

Der Diskmonitor erlaubt umfangreiche Operationen im 
Laufwerk-RAM und Manipulationen einzelner Blocks auf der 
Diskette. Der vorhandene Assembler ist befehlskompatibel 
zum Profi-Ass. Es wurden allerdings einige zusätzliche 
Befehle mit aufgenommen. So verarbeitet er ebenfalls illegale 
Opcodes. 

Grafik 


Die eingebauten Grafikbefehle für den C 64-Modus überzeu¬ 
gen durch ihre Schnelligkeit und Leistungsfähigkeit. Es wer¬ 
den bis zu vier Grafikseiten verwaltet, bei denen die Möglich¬ 
keit besteht, diese untereinander frei zu kopieren und zu 
mischen. Die erste Grafikseite liegt im RAM unter dem Basic- 
Interpreter. Alle weiteren Grafikseiten verbrauchen, insofern 
sie benötigt werden, Basic-Speicherplatz. Grafikfunktionen 
sind reichlich vorhanden. So existieren Befehle wie CIRCLE 
und BOX zum Zeichnen von Ellipsen, Kreisen oder Vier¬ 
ecken, LINE zum Ziehen von Linien und DRAW zum Entwer¬ 
fen komplexer Gebilde. Text kann sowohl horizontal wie auch 
vertikal in eine Grafik eingebaut werden. PLOT setzt oder 
löscht einzelne Punkte. Mit GSAVE und GLOAD ist das Spei¬ 
chern und Laden einzelner Grafikseiten möglich, wobei dann 
beim Laden sofort auf hochauflösende Grafik geschaltet 
wird. 

Centronics-Schnittstelle optional 


Gegen einen Aufpreis von 49 Mark erhält man eine 
Centronics-Schnittstelle, mit der man einen beliebigen 
Centronics-Drucker anschließen kann. Über die Sekundär¬ 
adresse können dabei verschiedene Modi wie Listingdruck, 
Linearkanal und Textdruck eingestellt werden. Formel C 
erkennt automatisch, an welchem Bus ein Drucker ange¬ 
schlossen ist. Entsprechend wird dann dieser Druckerange¬ 
steuert. Die automatische Erkennung ist auch abschaltbar. 

Natürlich wurden bei all diesen Erweiterungen einige Dis¬ 
kettenbefehle nicht vergessen. So läßt sich mit DIR ein Direc¬ 
tory von einer Diskette lesen, der Disketten-Status abfragen 
und auch DOS-Befehle können gesendet werden. Außerge¬ 
wöhnlich sind die Funktionen, die über die 
<RESTORE>-Taste erreichbar sind. Es läßt sich damit 
jederzeit eine Hardcopy des Bildschirmes starten, häufig 
auch innerhalb laufender Programme oder Spiele. Weiterhin 
eingebaut ist eine BACKUP-Routine, die eine vollständige 
Kopie einer Diskette in 80 Sekunden erstellt. Auch einzelne 
Dateien und Programme lassen sich mit FILECOPY kopieren. 

lozit 


Formel C ist eine gelungene Erweiterung für den C128. Spe¬ 
ziell für den C 64-Modus sind sehr viele gute Erweiterungen 
in einem Gehäuse zusammengefaßt. Außerdem erhöht das 
Modul die Datenübertragungsgeschwindigkeit von und zum 
Diskettenlaufwerk. Leider kann es nur mit der Diskettensta¬ 
tion 1541 betrieben werden. Für den Preis von 198 Mark ist 
es aber auf jeden Fall eine Erweiterung, die sehr viele und 
umfassende Funktionen in einem Modul beinhaltet und jeder¬ 
mann empfohlen werden kann, der oft im C 64-Modus arbei¬ 
tet und häufig benötigte Erweiterungen sucht. (dm) 

Info: Grewa Computertechnik. Wiesenstr. 82, 4350 Recklinghausen, Tel. 02361/181354 


Assemble Assemblierer! 

Register Anzeige der Prozessor-Register 

Single-Step Schrittweises Abarbeiten von Assembler¬ 

programmen 

Goto Startet ein Maschinenprogramm 

Exit Führt zurück ins Basic 

Printer on Leitet Ausgaben auf Drucker 

Printer off Schaltet zurück auf Bildschirm 

Find Findet Befehle 

Fill Füllt Speicherbereich mit bestimmtem Wert 

Hunt Findet Bitkombinationen 

Breakpoint Setzt Abbruchbedingung bei Step 

Quickstep Ähnlich Single-Step 

Transfer Verschiebt Speicherbereiche 

Compare Vergleicht Speicherbereiche 

Load Lädt ein Maschinenprogramm 

Save Speichert ein Maschinenprogramm 

Disk-Monitor Mit Read-Write-Sektor 

2-Pass-Assembler 
Befehlskompatibel zu Profi-Ass 
Zusätzliche Label-Tabelle beliebig verschiebbar 
Verarbeitung illegaler Opcodes 


Grafik 

HIRES 

MULTI 

FRAME 

CLEAR 

TEXT 

PAGE 

COPY 

MIX 

INVERT 

GSAVE 

GLOAD 

PLOT 

LINE 

DRAW 

BOX 

BLOCK 

CIRCLE 

FILL 

HPRINT 

VPRINT 


Schaltet hochauflösende Grafik ein 

Schaltet Mehrfarben-Grafik ein 

Setzt die Rahmenfarbe 

Löscht den Grafikbildschirm 

Umschalten auf Text-Modus 

Umschalten verschiedener Grafikseiten 

Kopiert Bildschirme 

Mischt Grafikbilder 

Invertieren der Grafik 

Speichert Grafikbilder 

Lädt Grafikbilder 

Setzt einen Grafikpunkt 

Zieht eine Linie 

Zeichnen unregelmäßiger Linien 
Zeichnet ein Rechteck 
Zeichnet ein ausgefülltes Rechteck 
Erstellt einen Kreis 
Füllt eine Fläche aus 
Schreiben von Text 
in den Grafikbildschirm 
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SOFTWARE 


C 128 


Basic unter CP/M: MS- und CBask 
auf dem Commodoie 128 PC 



Ein leistungsfähiges Duo: Microsoft- und CBasic u■ ■ 1;r CP/M 


Sinnvolles Arbeiten unter CP/M beginnt entweder 
mit Programmen wie dBase II, Multiplan und Word¬ 
star 3.0, oder wendet sich an den Anwender, der 
selbst programmieren möchte. Dies ist beispiels¬ 
weise mit den beiden Basic-Compilern/Interpre- 
tern Microsoft-Basic und CBasic möglich. 

N achdem man den C128 ausgepackt und eine Weile mit 
der CP/M-Systemdiskette herumexperimentiert hat, 
stellt man oft enttäuscht fest, was CP/M eigentlich ist: 
Ein Betriebssystem. Es stellt lediglich einen Grundstock dar, 
auf dem Programme wie etwa dBase II oder auch Compiler 
und Interpreter aufbauen. Da die Programmiersprache Basic 
sehr verbreitet ist, stellen wir Ihnen zwei Basic-Compiler/ 
Interpreter vor und zeigen, was man mit ihnen anfangen kann. 


MS-Basic - das Profisystem 


Den MS-Basic-lnterpreter und Compiler gibt es jetzt mit eini¬ 
gen Zusatzprogrammen vom Markt&Technik Verlag auf einer 
Diskette für den Commodore 128 PC. Die Zusatzprogramme, 
die den Wert des Interpreters fast übertreffen, bestehen aus 
einem Compiler, sowie einem Z80-Makroassembler der Spit¬ 
zenklasse. Der Lieferumfang umfaßt ein etwa 700seitiges 
Begleitbuch sowie eine doppelseitig beschriebene Diskette. 
Auf der Diskette befinden sich drei unabhängige Programm¬ 
sammlungen, der Basic-Interpreter in zwei Ausführungen, 
der Compiler mit Linker und Bibliothek sowie der Makro¬ 
assembler mit Makrobibliothek und Crossreferenz-Programm. 

Der Interpreter wird unter CP/M durch Eingabe von 
»M BASIC« gestartet. Er meldet sich dann mit der Angabe der 


frei verfügbaren Bytes. Hier erscheinen maximal etwa 35000 
Bytes. Das erinnert stark an verflossen geglaubte C64- 
Dimensionen. Ganz so schlimm, wie es scheint, ist es aber 
doch nicht, da vieles durch den sehr großen Sprachumfang 
des Interpreters aufgefangen wird. Hier spürt man, daß MS- 
Basic eine professionelle Sprache ist. Für die Dateiverwal¬ 
tung finden sich sämtliche hierzu benötigten Befehle, aber 
auch Programmierprofis kommen auf ihre Kosten. Es wird 
zum Beispiel die Möglichkeit angeboten, mit Zahlen doppel¬ 
ter Genauigkeit zu rechnen. Befehle wie »IF..THEN..ELSE« 
oder »PRINT USING« gehören zum Standard. Insgesamt wer¬ 
den fast 140 Befehle und Funktionen angeboten (siehe 
hierzu auch die Befehls- und Funktionsübersicht in Tabelle 1). 

Als gravierendster Unterschied zum Basic-Interpreter des 
Commodore 128, der ja ebenfalls von Microsoft stammt, fällt 
auf, daß zwischen zwei Befehlen ein Zwischenraum stehen 
muß. Dies ermöglicht die Verwendung von beliebig langen 
Variablennamen, wobei jeder Buchstabe unterscheidungsre¬ 
levant ist. Es lassen sich dadurch Variablennamen verwen¬ 
den, die direkt deren Funktion im Programm beschreiben. 
Viele Programmierer werden die einfache Editiermöglichkeit 
beim Editor des C128 vermissen, denn im MS-Basic gibt es 
nur den »EDIT«-Befehl, der etwas umständlich zu handhaben 
ist. Das bietet bei genauerer Betrachtung jedoch einen gro¬ 
ßen Vorteil. Dem Programmierer wird es dadurch schwer 
gemacht, grundlegende Änderungen nachträglich in einem 
Programm durchzuführen und so dem gefürchteten »Spa¬ 
ghetticode« zu verfallen. Wer gleich eine Programmplanung 
vornimmt, braucht solche Änderungen nicht durchzuführen, 
das ganze Programm wird dadurch sehr übersichtlich. Stellt 
man allerdings Geschwindigkeitsvergleiche mit dem einge¬ 
bauten Basic-Interpreter des CI28 an, so wird man ent¬ 
täuscht. Die Ausführungszeit von MS-Basic-Programmen ist 
drei- bis viermal langsamer, als die der Programme im 
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C 128 


SOFTWARE 


C128-Modus. Dieser Umstand ist aber nicht dem Interpreter 
anzulasten, sondern dem CP/M-System des Commodore. 
Hier tritt wieder das alte Problem in Erscheinung, daß der 
Z80 im Commodore 128 sehr niedrig getaktet wird. 

Abhilfe versprechen sowohl der umfangreiche Befehls¬ 
satz, der viele Unterprogramme erspart, sowie der mitgelie¬ 
ferte Compiler. Zusammen mit dem Linker verwandelt er 
Basic-Programme in direkt ausführbare Programme, die unter 
CP/M wie gewohnt durch Angabe des Namens aufgerufen 
und gestartet werden. Hierbei ist gegenüber den nicht com- 
pilierten Programmen ein maximaler Geschwindigkeitszu¬ 
wachs von 30% zu verzeichnen. Bei ausgabeintensiven Pro¬ 
grammen ist allerdings kaum eine Verbesserung zu errei¬ 
chen, da die Geschwindigkeit hier stark vom Computer 
abhängt. 

Die zweite Version des Interpreters ist eine früher datierte 
Ausgabe von MS-Basic. Die Schreibweise der Befehle 
gleicht der von Basic 7.0; Variablennamen sollen nur zwei 
Zeichen umfassen und es gelten die üblichen Einschränkun¬ 
gen, daß in ihnen zum Beispiel keine Schlüsselworte enthal¬ 
ten sein dürfen. Ebenso hat diese Version einen einge¬ 
schränkten Befehlsumfang. Mitgeliefert wird sie hauptsäch¬ 
lich, um Programme, die auf anderen CP/M-Computern mit 
diesem Interpreter geschrieben wurden, leichter übertragen 
zu können. 

Gibt es Probleme, die sehr zeitintensiv sind, oder sollen 
Betriebssystemveränderungen gemacht werden, so wird 
man vom Microsoft-Programmpaket nicht im Stich gelassen. 
Hierfür bietet sich der ausgezeichnete Assembler an, der mit 
zum Besten gehört, was für Z80-Prozessoren derzeitig ver¬ 
fügbar ist. Dieser Assembler entschädigt für den unverständ¬ 
lichen Zug von Commodore, die im Handbuch erwähnten und 
beschriebenen Assemblerdienstprogramme MAC, LINK, LiB 
etc., auf einer extra für 80 Mark zu erwerbenden Diskette zu 


Reservierte Wörter in MS-Basic 


ABS 

ERASE 

LOG 

RIGTHS 

AND 

ERL 

LPOS 

RND 

ASC 

ERR 

LPRINT 

RSET 

ATN 

ERROR 

LSET 

RUN 

AUTO 

EXP 

MERGE 

SAVE 

CALL 

FIELD 

MIDS 

SGN 

CDBL 

FILES 

MKDS 

SIN 

CHAIN 

FIX 

MKIS 

SPACES 

CHR$ 

FN 

MKSS 

SPC 

CINT 

FOR 

MOD 

SQR 

CLEAR 

FRE 

NAME 

STEP 

CLOSE 

GET 

NEW 

STOP 

COMMON 

GOSUB 

NEXT 

STRS 

CONT 

HEX$ 

NOT 

STRINGS 

COS 

IF 

DCTS 

SWAP 

CSAVE 

IMP 

ON 

SYSTEM 

CSNG 

INKEYS 

OPEN 

TAB 

CVD 

INP 

OPTION 

TAN 

CVI 

INPUT 

OR 

THEN 

CVS 

INPUT# 

OUT 

TO 

DATA 

INPUTS 

PEEK 

TROFF 

DEFDBL 

INSTR 

POKE 

TRON 

DEFINT 

INT 

POS 

USING 

DEFSNG 

KILL 

PRINT 

USR 

DEFSTR 

LEFTS 

PUT 

VAL 

DEF USR 

LEN 

RANDOMIZE 

VARPTR 

DELETE 

LET 

READ 

WAIT 

DIM 

LINE 

REM 

WEND 

EDIT 

LIST 

RENUM 

WHILE 

ELSE 

LUST 

RESET 

WIDTH 

END 

LOAD 

RESTORE 

WRITE 

EOF 

LOC 

RESUME 

WRITE# 

EQV 

LOF 

RETURN 

XOR 


Tabelle 1. Sprachumfang MS-Basic 


vertreiben. Hier sei gleich davor gewarnt, mit dem Microsoft- 
M80-Assembler Maschinensprache-Programmierung lernen 
zu wollen. Für diese Zwecke ist das ganze Paket viel zu 
umfangreich, und der Anfänger würde von den vielen Mög¬ 
lichkeiten nur verwirrt. Absolute Neulinge sollten auf einem 
einfacheren Assembler die ersten Schritte wagen. Der Profi 
aber bekommt ein Werkzeug in die Hand, das er nach kurzer 
Zeit nicht mehr missen möchte. Von Makro-Definition über 
Bibliotheken bis hin zur bedingten Assemblierung ist alles 
vorhanden, was zum Arbeiten mit Z80-Prozessoren notwen¬ 
dig ist. Leider stellt Microsoft keinen Editor zur Verfügung, so 
daß auf den mit der Commodore-Systemdiskette mitgeliefer¬ 
ten Zeileneditor »ED« zurückgegriffen werden muß. Für grö¬ 
ßere Projekte ist aber ein großer Editor wie Wordstar auf¬ 
grund der einfacheren Bearbeitung von Programmen sehr zu 
empfehlen. 

Ein wichtiges Werkzeug zur Fehlersuche wird mit dem Pro¬ 
gramm CREF mitgeliefert. Es bietet sich so die Möglichkeit, 
eine alphabetisch geordnete Liste aller im Assemblerlisting 
vorkommenden Variablen mit Zugriffsangabe anzulegen, 
ebenso sind Sprünge im Programm einfach nachzuvollzie¬ 
hen. 

Der Einsatz von MS-Basic 


Insgesamt betrachtet stellt das Microsoft-Basic Paket eine 
abgerundete Programmsammlung dar, die vielen Anwendern 
Nutzen bringt. Der Basic-Interpreteristin Zusammenhang mit 
dem Compiler ideal, um Programme zu schreiben, die mit fer¬ 
tigen CP/M-Programmen Zusammenarbeiten. So ist es zum 
Beispiel möglich, eine einfache Adreßverwaltung zu schrei¬ 
ben, die die Daten im Wordstar-Mailmerge-Förmat auf Dis¬ 
kette h'. legt oder um Multiplan-Datenbestände grafisch auf 
Druckern auszuwerten. Sich das Programmpaket zu kaufen, 
um nur alternativ unter CP/M Basic zu programmieren, ist 
nicht sehr sinnvoll. Der eingebaute Interpreter ist billiger und 
in den meisten Fällen auch besser; ebenso tun sich Anfänger 
leichter, als mit MS-Basic, da beim Basic 7.0, wie oben 
erwähnt, Verbesserungen ganz einfach anzubringen sind. 

Das Microsoft-Paket ist also mehr als Bindeglied zwischen 
vorhandenen CP/M-Programmen und zur Lösung individuel¬ 
ler Problemstellungen unter CP/M anzusehen. In dieser Auf¬ 
gabe muß es sich allerdings Vergleiche mit anderen Spra¬ 
chen, wie zum Beispiel Turbo-Pascal, gefallen lassen. MS- 
Basic hat den großen Vorzug, Professionalität, Einfachheit 
und großen Bekanntheitsgrad der Sprache miteinander zu 
verbinden. Die Sprache Basic ist zwar eine einfach zu erler¬ 
nende Computersprache, das Paket bietet aber auch wach¬ 
senden Ansprüchen etwas, wobei hier insbesondere der 
Assembler gemeint ist. Durch dessen hervorragende Quali¬ 
tät ist die Programmsammlung auch als Maschinensprache- 
Entwicklungspaket zu sehen. Die Hauptteile können mit dem 
Assembler geschrieben werden, Test- und Überwachungs¬ 
programme in MS-Basic, wobei durch den Compiler kaum 
Geschwindigkeitseinbußen hingenommen werden müssen. 

Leider stellt das mitgelieferte Handbuch hohe Ansprüche 
an die Englischkenntnisse des Benutzers. Nur die ersten 160 
Seiten des etwa 700 Seiten starken Druckwerks sind in 
Deutsch und bieten eine kurze Übersicht über die Möglich¬ 
keiten von MS-Basic. Möchte man ausführliche Informatio¬ 
nen über Befehle oder Besonderheiten, so muß man dies im 
englischen Teil nachlesen, der dafür sehr ausführlich gehal¬ 
ten ist. 

Fazit: Das Haupteinsatzgebiet des MS-Basic-Paketes von 
Microsoft liegt beim erfahrenen CP/M-Anwender. Dieser 
Benutzerkreis bekommt ein Programmentwicklungspaket 
zur Verfügung gestellt, das auch professionelle Wünsche 
befriedigt. Mit diesem Werkzeug besitzt der Programmierer 
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Reservierte Wörter in CBasic 


ABS 

ERR 

LE 

PUBLIC 

STRINGS 

AND 

ERRL 

LEFTS 

PUT 

SUB 

AS 

ERROR 

LEN 

RANDOMIZE 

TAB 

ASC 

ERRX 

LET 

READ 

TAN 

ATTACH 

EQ 

LINE 

READONLY 

THEN 

ATN 

EXP 

LOCK 

REAL 

TO 

BUFF 

EXTERNAL 

LOCKED 

RECL 

UCASES 

CALL 

FEND 

LOG 

RECS 

UNLOCK 

CHAIN 

FLOAT 

LPRINTER 

REM 

UNLOCKED 

CHR$ 

FOR 

LT 

REMARK 

USING 

CLOSE 

FRE 

MATCH 

RENAME 

VAL 

COMMANDS 

GE 

MFRE 

RESTORE 

VARPTR 

COMMON 

GET 

MID$ 

RETURN 

WEND 

CONCHAR% 

GO 

MOD 

RIGHTS 

WHILE 

CONSOLE 

GOSUB 

NE 

RND 

WIDTH 

CONSTAT% 

GOTO 

NEXT 

SADD 

XOR 

COS 

GT 

NOT 

SGN 

%CHAIN 

CREATE 

IF 

ON 

SHIFT 

%DEBUG 

DATA 

INITIALIZE 

OPEN 

SIN 

%EJECT 

DEF 

INKEY 

OR 

SIZE 

%INCLUDE 

DELETE 

INP 

OUT 

SQR 

%LIST 

DETACH 

INPUT 

PEEK 

STEP 

% NOLIST 

DIM 

INT 

POKE 

STOP 

%PAGE 

ELSE 

INT% 

POS 

STRS 


END 

INTEGER 

PRINT 

STRING 



Tabelle 2. Sprachumfang CBasic 


alles, was er zur optimalen Nutzung des Betriebssystems 
CP/M benötigt. Unerfahrenen Computerbesitzern kann man 
MS-Basic nicht uneingeschränkt empfehlen, es besteht 
leicht die Gefahr, von den vielfältigen Möglichkeiten »über¬ 
rollt« zu werden. Aber gerade durch seine Vielfältigkeit 
schließt MS-Basic eine wichtige Lücke in der Programm¬ 
sammlung für den CI28. 

CBasic - Komfort ist alles 


Mit CBasic bietet Markt&Technik einen weiteren Basic- 
Compiler an, der vor allem durch die komfortable Program¬ 
mierumgebung hervorsticht. Auf der Diskette befinden sich 
der Compiler, ein Linker und ein Programm zur Verwaltung 
von Modulen. Was es damit auf sich hat, erfahren Sie später. 

Um nun ein CBasic-Programm zu schreiben, muß erst ein¬ 
mal der Quelltext erfaßt werden. Hier muß auf den CP/M- 
Editor zurückgegriffen werden, dessen Leistung allerdings 
nicht mehr dem heutigen Standard entspricht. Wer über 
anwendungsfreundlichere Editoren verfügt, zum Beispiel 
Wordstar, sollte diese auf jeden Fall benutzen. 

Zum Basic-Interpreter des C128-Modus weist CBasic 
einige Unterschiede auf, die sofort positiv auffallen. So 
braucht der Programmierer keine Zeilennummern mehr zu 
verwenden, sondern kann direkt Labels, also konkrete 
Namen, für die Sprungziele angeben. Natürlich können auch 
die herkömmlichen Zeilennummern verwendet werden. Des 
weiteren ist es möglich, in CBasic Funktionen zu definieren. 
Aber das kennen wir ja schon vom C128-Modus, werden Sie 
jetzt vielleicht sagen. Die CBasic-Funktionen, und das ist der 
große Unterschied, können mehrzeilig sein und wie Unter¬ 
programme behandelt werden. Von herkömmlichen Unter¬ 
programmen (GOSUB) unterscheiden sie sich durch die 
Möglichkeit, Variablen an die Funktion zu übergeben, ähnlich 
den Funktionen in der Sprache C. Die Variablen, die dann in 
der Funktion benutzt werden, sind lokal, das heißt, sie gelten 
nur für den Bereich der Funktion. 

Bei der Variablenbehandlung wäre noch eine Besonderheit 
von CBasic erwähnenswert. Zwar definiert der Compiler jede 
Variable bei ihrem ersten Aufruf im Programm selbst, doch 


besteht auch die Möglichkeit, den Variablentyp am Programm¬ 
anfang festzulegen. Es können Integer-, String- und Real- 
Variablen deklariert werden. Der Vorteil dieses Verfahrens 
liegt im Weglassen der näheren Variablenbezeichnung (%,$) 
im weiteren Programmverlauf. 

Doch damit ist der Sprachschatz von CBasic (Tabelle 2) 
noch nicht erschöpft. Mit einem speziellen Befehl können 
auch Overlays, also Programme, die sich gegenseitig nachla¬ 
den, erzeugt werden. Dem nachgeladenen Programm über¬ 
gibt CBasic alle Variable, die mit der Anweisung »COMMON« 
deklariert wurden. Auch diese Variable können vorher mit den 
bereits bekannten Anweisungen auf ihren Typ voreingestellt 
sein. Um die ganze Sache noch abzurunden, existieren 
selbstverständlich noch Anweisungen wie »WHILE« und »IF 
... THEN ... ELSE«. Des weiteren verfügt CBasic noch über 
einige Funktionen zum Ermitteln von Variablenadressen und 
der Manipulation von Zahlenvariablen. 

Besonders hervorzuheben sind auch die umfangreichen 
Befehle zur Dateiverwaltung. Voll integriert ist die Behand¬ 
lung von relativen Dateien. Es ist sogar möglich, eine Datei 
bei der Eröffnung beispielsweise als »Nur-Lese-Datei« zu 
deklarieren, so daß ein versehentliches Überschreiben von 
Daten von vorneherein ausgeschlossen ist. Alle übrigen, 
bereits aus dem CI 28-Modus bekannten Standardfunktio¬ 
nen, sind ebenfalls fast vollständig enthalten. 

Sozusagen Hand in Hand arbeiten hier Compiler und Quell¬ 
code, denn im Basic-Text können Befehle eingefügt werden, 
die die Compilierung direkt beeinflussen. So kann für die Aus¬ 
gabe eines Listings auf einem Drucker ein Seitenvorschub 
eingefügt, die Seitenlänge festgelegt oder das Listing von 
Programmteilen ganz unterdrückt werden. Über eine solche 
Anweisung ist es möglich, weitere Quellcodes in den beste¬ 
henden einzubinden und mitzucompilieren. Einen Debugger 
können Sie auf dieselbe Art und Weise aktivieren. Um die 
Aus- und Eingabe während des Compilierens zu manipulie¬ 
ren, beispielsweise um Dateien von anderen Laufwerken ein¬ 
zubinden oder ein Listing auf Drucker zu erzeugen, können 
dem Compiler beim Aufruf verschiedene Parameter mitgeteilt 
werden, die dann die gewünschten Effekte erzeugen. Das¬ 
selbe gilt auch für den Linker, der nach dem Compilieren 
noch die nötigen Module für ein ablauffähiges COM-File 
anfügt. Für diese Module existiert auf der Diskette ein Pro¬ 
gramm, mit dem man selbsterstellte Module für den Einsatz 
mit dem Linker aufbereiten kann (LIB). Dadurch hat man also 
die Möglichkeit, den Compiler individuell umzugestalten. 

Nach den doch etwas langwierigen Prozeduren des Com¬ 
pilierens und Linkens ist die Ausführungszeit des fertigen 
Programms geradezu herzerfrischend. Getestet wurde dies 
mit einem Programm, das einen Zähler von 1 bis 10000 
hochzählt. Das Compilieren und Linken dauerte zusammen 
zirka drei Minuten, während die Ausführungszeit bei 0,5 
Sekunden liegt. 

Als bestens geeignet erweist sich der CBasic-Compiler für 
den Anwendungsprogrammierer, der sich mehr in Richtung 
kommerzieller Anwendung, wie etwa dem kaufmännischen 
Bereich, bewegt. Die Möglichkeit der strukturierten Program¬ 
mierung mit Hilfe von Funktionen und Schleifen stellt selbst 
die Ansprüche von professionellen Programmierern zufrie¬ 
den. Der große Befehlssatz, das zum Großteil ausführliche, 
aber nur in Englisch vorliegende Handbuch und der respek¬ 
table Preis von 174 Mark machen den CBasic-Compiler 
zu einem unersetzlichen Helfer für den CP/M-Basic-Pro- 
grammierer. (Guido Weckwerth/bj/rf) 


Info: MS-Basic (Microsoft). Vertrieb: Markt&Technik Verlag, Hans-Pinsel-Str. 2.8013 Haar bei Mün¬ 
chen, Preis: 199 Mark 

CBasic (Digital Research). Vertrieb: Markt&Technik Verlag. Hans-Pinsel-Str. 2, 8013 Haar bei Mün¬ 
chen, Preis: 174 Mark 
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Textverarbeitung 
mit Protext für den 
C128 PC 


Die Autoren Rudolf Schineis 
und Hans-Jürgen Thies, beide 
selbst aktive Programmierer, 
haben in dem soeben erschie¬ 
nenen Werk ihr Konzept von 
einer Einführung für Textverar¬ 
beitungsneulinge bis hin zu Tips 
und Tricks für den Profi konse¬ 
quent durchgehalten. Auch der 
fortgeschrittene Anwender fin¬ 
det viel Information über die 
Feinheiten beim Umgang mit 
Protext 128. In dieser Manier 
werden zuerst die benötigten 
Systemkomponenten, die Pro¬ 
text 128 voraussetzt, vorge¬ 
stellt und die ersten Schritte in 
dieses hervorragende Textver¬ 
arbeitungsprogramm unternom¬ 
men, zum Beispiel das Erstellen 
einer Arbeitsdiskette. In den fol- 


fextterarbejtwgmit 

PROTECT 

fürdenCtKPC 


»»«•WwvwnPHOTTjn. C 


ii r —— « ■ 


genden beiden Kapiteln lernt 
der frischgebackene Anwender 
von Protext 128 alle Textfunktio¬ 
nen, Korrekturmöglichkeiten 
und vieles mehr kennen. Am 
Ende des vierten Kapitels ist der 
Textverarbeitungsneuling in der 
Lage, einen perfekten Brief 
nach eigenen Wünschen zu 
gestalten. Die folgenden Kapitel 
wenden sich an den (nun) Fort¬ 
geschrittenen: Serienbriefe, 

trickreiche Anschriftenverwal¬ 
tung, Module, Jobs, Phrasen 
und Makros. Hier wird gezeigt, 
wie leistungsfähig mit einem 
ausgereiften Textverarbeitungs¬ 
system gearbeitet werden kann, 
ohne daß die Tätigkeiten am 
CI28 zur tatsächlichen Arbeit 
werden. In der zweiten Hälfte 
dieses Buches werden wichtige 
Gebiete, wie etwa der Terminal- 
Modus in Protext 128, Datenaus¬ 
tausch mit anderen Program¬ 
men, alles um den Druckertrei¬ 
ber sowie Sonderfunktionen 
des Programms vorgestellt, die 
weit über die Textverarbeitungs¬ 
norm hinausgehen. Als sehr hilf¬ 
reich bei der Arbeit mit Protext 


128 stellt sich die alphabeti¬ 
sche Befehlsübersicht im 
Anhang C heraus. Die beiden 
größten Pluspunkte sammelt 
dieses Werk sowohl durch die 
beiliegende Diskette mit Demo¬ 
texten und Druckertreibern 
(zum Beispiel für MPS 801, 
MPS 803, NEC, TA-Gabriele 
9009, Epson FX 85) sowie dem 
Komplettpreis für Buch und Dis¬ 
kette von sage und schreibe 39 
Mark. 

Fazit: Sehr empfehlenswert 
für alle Protext-128-Anwender. 

(E. Schwab/bj) 

Info; R. Schln8ls/H.J. Thies, Textverarbellung 
mit Protext für den CI28 PC. MarktSTechnlk 
Verleg, 258 Seiten, ISBN 3-89090-375-4, 
Preis: 39 Mark elnsohlleBlich Zusatzdiskette 

Turbo-Pascal 

Die Autoren Irene und Peter 
Lüke legten in diesem Buch 
besonderen Wert darauf, den 
Leser ohne besondere Vor¬ 
kenntnisse in Turbo-Pascal ein¬ 
zuführen. Dabei werden alle 
Turbo-Pascal-Versionen bis 3.0 
unter CP/M und unter MS-DOS 
berücksichtigt. Die Sprachele- 
mente wie Variablentypen, 
Funktionen und Prozeduren, die 
in Turbo-Pascal bereits definiert 
sind, werden anhand von Bei¬ 
spielen vorgestellt und in 
Abfolge ihrer Verwendung 
beschrieben. Als Ergebnis des 
Lernteils dieses Buches erhält 
der Anwender ein Farbkombina- 
tionsspiel nach Art von »Master- 
Mind«, ausführliche Kenntnisse 
über dessen Aufbau, die Mög¬ 
lichkeiten der strukturierten 
Programmierung in Turbo- 
Pascal sowie über den Umgang 
mit den Compiler-Funktionen 
überhaupt. Taucht etwa im Spiel 
ein Variablentyp auf, so werden 
die Variablenarten allgemein be¬ 
sprochen. Weitere Kapitel des 
Buches sind beispielsweise den 
Ein- und Ausgabefunktionen, 
Strukturanweisungen (begin/ 
end, do/until etc.), Dateiverwal¬ 
tung (Records), Mengentypen 


MakXfaMk 


TURBO- 

PASCAL 


i 

i 


(Sets) und Texttypen (Files) 
gewidmet. Weiterhin wird aus¬ 
führlich auf die Turbo-Tools 
(etwa Turbo-Grafik) und die 
Funktionen des Turbo-Pascal- 
Editors eingegangen. Bedauer¬ 
licherweise wurde keine alpha¬ 
betisch geordnete und doku¬ 
mentierte Befehlsübersicht in 
dieses Buch aufgenommen, 
wodurch sich der Wert als Nach¬ 
schlagewerk reduziert. Insge¬ 
samt kann dieses Buch jedoch 
jedem Einsteiger in Turbo- 
Pascal empfohlen werden. 

(K. Steinmetz/rf/bj) 

Info: Irene und Peler Lüke, Tbrbo-Pascal, 
MarklÄTechnlk Verlag, 290 Seifen, ISBN 
3-89090-150-8, Preis: 49 Mark 


Der Einstieg in C 

Keinerlei Grundwissen setzt 
Paul M. Chirlian beim Leser vor¬ 
aus. Am Anfang des Buches 
werden sogar noch grundle¬ 
gende Dinge zum Thema Com¬ 
puter angesprochen. Über viele 
Beispiele wird der Lernende an 
die Programmiersprache »C* 
herangeführt und lernt nach und 
nach alle Elemente dieser zwar 
leistungsfähigen, aber kompli¬ 
zierten Sprache kennen. Gegen 
Ende jjjeses aufschlußreichen 
Werkes wird das schwierigste 



»Ca-Thema abgehandelt: die 
Arrays und Pointer. Alle mögli¬ 
chen Variationen werden aus¬ 
führlich und durch Beispiele 
unterlegt beschrieben. Zu guter 
Letzt wird dem Leser noch die 
Arbeit mit Strings und Struktu¬ 
ren sowie verschiedene Ein-/ 
Ausgabeprozeduren erklärt. 

»Der Einstieg in C« erweist 
sich vor allem für den Anfänger, 
der keine Kenntnisse in der »C«- 
Programmierung besitzt, als 
unentbehrliches Einsteiger¬ 
und Nachschlagewerk. 

(L Hartmann/rf/bj) 

Info: Paul M. Chirlian, Der Einstieg in C, 
Markl&Technik Verlag, 290 Seiten, ISBN 
3-89090-086-0, Preis: 60 Mark 


Wie arbeite ich mit 
dem Commodore 128 

Unter dieser Fragestellung 
geht der Autor Wolfgang 
Schneider an den Themenkom¬ 
plex CI28 heran. Das gut 
durchdachte Konzept konzen¬ 
triert das Wesentliche zu dem 
jeweiligen Thema, ohne sich 
von der Informationsflut der dar¬ 
gestellten Materie überrollen zu 
lassen oder in die häufig ver¬ 



wendete Fachsprache zu verfal¬ 
len. Das Buch verbindet die Ein¬ 
führung in das neue Medium 
CI28 mit komprimierter, oft 
tabellarischer Information, die 
dennoch anspricht. Weiterhin 
werden Hinweise, Leitsätze, 
Erklärungen und verständliche 
Definitionen optisch markiert, 
was das Herauskristallisieren 
von besonders wichtigen Infor¬ 
mationen erleichtert. Praktisch 
alle Gebiete, die unter der obi¬ 
gen Zielsetzung relevant sind, 
werden behandelt: Es fehlen 
weder die drei verschiedenen 
Betriebsarten des CI28, allge¬ 
meine Überblicke über Pro¬ 
grammierung, Hardware des 
CI28 und dessen möglicher 
Peripherie, noch das Arbeiten 
mit Basic-Programmen, Kasset¬ 
tenrecorder oder Floppy-Lauf- 
werken. Auch Grafik, Musik und 
Sprachumfang des C128 
anhand kleiner Beispiele sind 
Teilgebiete des Buches. 

Fazit: Wer gerne mehr über 
seinen CI28 wissen möchte 
und die Informationen verständ¬ 
lich, aber komprimiert bevor¬ 
zugt, dem sei dieses Werk 
wärmstens empfohlen. Nach¬ 
dem man sich das Hintergrund¬ 
wissen angeeignet hat, kann 
man immer noch auf fachspezifi¬ 
sche Bücher umsteigen, die 
dann die entsprechende Mate¬ 
rie abschließend behandeln. 

(J. Rieder/bj) 

Info: Wolf gang Schneider. Wie arbeite ich mil 
dem Commodore 128?. Vieweg-Verlag, 342 
Seilen. ISBN 3-528-04472-1, Preis: 48 Mark 
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Durchblick mit dem TEDMON 


Erfreulicherweise steht dem C128-Besitzer mit 
dem integrierten Monitor TEDMON ein leistungs¬ 
fähiges Werkzeug zur Verfügung. Obwohl in der 
Anleitung immer von einem Maschinensprache- 
Monitor die Rede ist, kann auch der Basic- 
Programmierer den TEDMON effektiv einsetzen. 
Der folgende Kurs hilft ihm dabei. 

F ast jeder etwas fortgeschrittene Basic-Programmierer 
stand schon einmal staunend vor dem seltsamen Zah¬ 
lendschungel, der von einem Maschinensprache- 
Monitor erzeugt wird und wußte nicht, was er damit anfangen 
sollte. In diesem Kurs werden Sie lernen, daß der Monitor ein 
durchaus leistungsfähiges Werkzeug darstellt, das auch der 
Basic-Programmierer hervorragend einsetzen kann, wenn er 
weiß, wie der Monitor bedient werden muß. 

Natürlich geht dies alles nicht ohne Theorie, aber der Kurs 
ist so gestaltet, daß Sie alles gleich an Ihrem C128 testen 
können. Dazu sollten Sie Basic-Kenntnisse mitbringen; wenn 
Sie gar Maschinensprache beherrschen, wird Ihnen der Kurs 
noch mehr helfen, erforderlich ist das jedoch nicht. 

Zur Funktion des Monitors: Zunächst einmal dient der 
Monitor nur zum Zugriff auf den Speicher des Computers. 
Dies klingt nicht sehr interessant, aber man muß sich nur vor 
Augen führen, wie wichtig der Speicher für unseren Compu¬ 
ter ist. 

Aufgrund der Befehlsstärke des Basic 7.0 kann man fast 
vergessen, daß auch ein Basic-Programm nichts anderes als 
eine Ansammlung von Speicherinhalten ist. Über Basic greift 
man mittels POKE, PEEK und WAIT auf den Speicher zu. 
Speicherzellen kann man als Fächer verstehen, in denen 
Informationen - die Speicherinhalte - untergebracht sind. Die 
folgenden Erläuterungen von Grundbegriffen mögen dem 


Fortgeschrittenen langweilig erscheinen, für den Anfänger 
sind sie unentbehrlich. 

Die Chips (zum Beispiel Sound-Chip SID 6581) und das 
Betriebssystem (das Programm, das den Computer vom Ein¬ 
schalten an dauernd steuert) benötigen viele Zugriffe auf den 
Speicher. Wenn sich der Computer irgend etwas merken will 
(zum Beispiel eine Zahl, einen Basic-Befehl oder einen 
String), so muß er es im Speicher - seinem Gedächtnis - ab- 
legen. 

Der Speicher ist in Speicherzellen (auch Speicherplätze 
genannt) unterteilt. Jeder Speicherplatz kann eine Zahl von 
0 (minimal) bis 255 (maximal) oder einfach ein Zeichen (als 
ASCII-Code, zum Beispiel 65 für »A«) aufnehmen. Diese 
Speicherkapazität (ein Zeichen) heißt ein Byte. Haben Sie 
eine Einheit von 1024 Byte, so spricht man auch von einem 
KiloByte oder kurz KByte. Weitere Unterteilungen bespre¬ 
chen wir beim Binärsystem. 

Jede Speicherzelle ist durch eine Adresse genau 
bestimmt. Die Adresse ist eine Zahl von 0 (minimal) bis 
65535 (maximal). Beim CI28 kommt noch die Speicher¬ 
bank hinzu, da wir die 128 KByte mit den Zahlen 0 bis 65535 
nicht eindeutig beschreiben könnten. Auch damit werden wir 
uns noch auseinandersetzen. 

In unserem Computer gibt es nun Speicherplätze, die Aus¬ 
künfte über das Basic-Programm, Grafik-Daten, das Basic- 
Programm selbst und seine Variablen oder ähnliches enthal¬ 
ten. Mit dem Monitor können wir diese Speicherzellen ausle- 
sen (die Inhalte der Speicherzellen anzeigen lassen) und 
zurückschreiben (die Inhalte ändern und in die Speicherzelle 
aufnehmen). Dadurch werden uns Einflußnahmen auf den 
Computer möglich, die uns vorher verschlossen waren. 

Mit dem Monitor unterhalten wir uns ähnlich wie mit dem 
Basic 7.0 im Direktmodus: Wir geben Kommandos (meist mit 
Parametern) ein, die dann ausgeführt oder mit einer Fehler¬ 
meldung quittiert werden. Damit der Computer weiß, daß die 
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Befehle an den Monitor gerichtet sind, müssen wir den Moni¬ 
tor starten. Dies geschieht am einfachsten über den Basic- 
Befehl MONITOR, der erfreulicherweise schon als Belegung 
der Funktionstaste <F8> (<SHIFT+F7>) vorgesehen ist. 

Wenn wir MONITOR eingeben (oder einfach <F8> 
drücken), erhalten wir die Meldung »MONITOR«. 

Darunter steht die zweizeilige Register-Anzeige, die wir 
zunächst ignorieren wollen (sie ist ohnehin nur für 
Maschinensprache-Programmierer interessant). 

Diese Meldung »MONITOR« entspricht der Meldung 
»COMMODORE BASIC V7.0...«, die beim Reset ausgege¬ 
ben wird. 

Wenn nun der Cursor blinkt, ist er - wie im Basic - das 
Signal, daß der Computer auf weitere Eingaben wartet. 

Um noch einmal auf die Meldung »MONITOR« zurückzu¬ 
kommen: Diese Meldung signalisiertauch, daß - solange wir 
uns im Monitor befinden - sämtliche Basic-Befehle außer 
Kraft sind. Von nun an werden nur noch die speziellen 
Monitor-Kommandos akzeptiert, von denen wir schon im 
nächsten Abschnitt den ersten kennenlernen werden. Diese 
Monitor-Kommandos können übrigens - wie Basic- 
Kommandos - über < RUN/STOP > abgebrochen werden. 

In Bild 1 sehen Sie noch einmal, wie ein Bildschirm beim 
Starten des Monitors <F8> aussieht. 

Der erste Befehl: X 


Wie gesagt, im Monitor gelten die Basic-Befehle nicht mehr. 
Wenn man wieder in den Eingabemodus des Basic-Interpre- 
ters zurück möchte (vielleicht verspüren Sie so etwas wie 
Heimweh...), ist dafür der einfachste Monitor-Befehl vorgese¬ 
hen: Sie geben einfach X ein und drücken - wie in Basic - zur 
Bestätigung < RETURN >. An der Meldung »READY.« kön¬ 
nen Sie erkennen, daß Sie sich wieder im vertrauten Basic 
befinden. X hat keine Parameter, das heißt Sie müssen keine 
weiteren Angaben machen. Dieser Befehl entspricht einem 
END in Basic. 

Hinweis: Der Befehl, der auf den Basic-Befehl MONITOR 
folgt, wird nach X nicht abgearbeitet! 

In Bild 2 finden Sie alle Informationen zu unserem ersten 
Befehl. Diese Kurzübersichten haben folgendes Schema: 

- Befehl (Buchstabe des Befehls) 


Monitor — Der Befehl zum Starten (über F8 erreichbar) 

Monitor —Einschaltmeldung 

PC SR AC XR YRSPV Regi steranzeige 
; FBOOO 00 00 00 00 F8 J 


1 

Cursor als Aufforderung zur Eingabe von Befehlen 


Bild 1. Das erscheint beim Starten des Monitors 


Befehl: 

X 

Syntax: 

X 

keine Parameter) 

Wirkung: 

Verlassen des Monitors 

englisches Wort: 

exit (deutsch verlassen) 


Bild 2. Kurzübersicht zum Befehl X 




- Syntax (wie werden Parameter übergeben) 

- Wirkung 

- englisches Wort, von dem die Ein-Buchstaben-Abkürzung 
abgeleitet ist 

Im Fall des Befehls X ist dies nicht sehr umfangreich, da der 
Befehl, wie gesagt, keine Parameter kennt. 

Das Hexadezimal- und das Binärsystem 


Nachdem wir so schnell den Einstieg in die Praxis gefunden 
haben, müssen wir wieder zur Theorie. X ist nämlich der ein¬ 
fachste aller Befehle (weshalb wir ihn zuerst besprochen 
haben), für etwas kompliziertere Anwendungen fehlen uns 
nur noch einige Grundkenntnisse und -begriffe. 

Wahrscheinlich haben Sie schon gehört, daß das Zahlensy¬ 
stem, mit dem der Computer intern arbeitet, anstelle der 
Basis 10 (unser gebräuchliches Dezimalsystem) die Basis 2 
hat. Die Ziffern sind also nicht 0 bis 9, sondern 0 und 1. 0 wird 
in bezug auf elektronische Signale als »AUS«-, 1 als »EIN«- 
Zustand verstanden. Wie wir eine Dezimalzahl in Potenzen 
der Basis 10 zerlegen können (1986 = 1 *10 3 + 9* 10 2 + 
8*10' + 6*10° = 1*1000 + 9*100 + 8*10 + 6*1 = 
1000 + 900 + 80 + 6 = 1986 q.e.d.), können wir auch so 
den Wert einer Binärzahl ins dezimale Format umwandeln: 
%10101101 = 1 * 2 7 + 0 * 2 6 +1 * 2 5 + 0 * 2 4 +1 * 2 3 
+ 1 * 2 2 + 0 * 2 ’ + 1 * 2 ° 

= 2 7 + 2 5 + 2 3 + 2 2 + 2 ° 

= 128 + 32 + 8 + 4+1 
= 173 

Wie Sie sehen, wird einer binären Zahlenangabe das Pro¬ 
zentzeichen »%« vorangestellt, damit wir binäre von dezima¬ 
len Zahlen unterscheiden können. 

Ein-’ 3inärziffer (englisch: binary digit) heißt Bit. Bit ist die 
Untereinheit von Byte; mit 8 Bit (siehe Beispiel) kann man 
genau ein Byte darstellen (0 <= 173 <= 255). 

Um Werte bis 65535 (65535 = 2 16 - 1) darzustellen, 
brauchen wir genau 16 Bit = 2 Byte. Das eine Byte enthält 
den niederwertigen Teil (Low-Byte, kurz LB), das andere den 
höherwertigen (High-Byte, kurz HB). Die gesamte Zahl 
errechnet sich folgendermaßen: 

Zahl = LB + 2« * HB = LB + 256 * HB 

Die Bits des HB sind die höchstwertigen acht Bit der 
gesamten Zahl, die Bits des LB die acht niederwertigsten. 

Im übrigen können wir auch im Dezimalsystem ähnliche 
Zerlegungen, die uns für die Arbeit am Computer allerdings 
nichts bringen, durchführen: 

1986 = 86 + 10 2 * 19 = 86 + 100 * 19 = 86 + 1900 

An unserem Beispiel der Binärdarstellung von 173 läßt sich 
auch der große Nachteil des Binärsystems für den Menschen 
aufzeigen: Um eine recht kleine Zahl wie 173 darzustellen, 
werden viele Ziffern (8!) benötigt; um eine Adresse (0 bis 
65535) darzustellen, brauchen wir 16 Ziffern (LB+HB = 8 
Bit + 8 Bit = 16 Bit = 16 Binärziffern): 

65535 = %11111111 11111111 

In Bild 3 und 4 finden Sie noch einige Informationen zum 
Binärsystem und zur LB/HB-Darstellung in Form von Beispie¬ 
len. 

Nun gibt es ein Zahlensystem, das einen Kompromiß zwi¬ 
schen Binärsystem (für die Maschine leichtverständlich) und 
Dezimalsystem (für den Menschen sinnvoll, für die Maschine 
ungeeignet) bietet. Es hat die Basis 2 4 = 16 und folgende 
Ziffern: 

0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F 

Die Buchstaben sind auch Ziffern; dabei entspricht A der 
dezimalen 10, B der 11, C der 12, D der 13, E der 14 und F 
der 15. 

Mit einer Hex-Ziffer (Hexadezimal kürzt man gerne mit Hex 
ab) kann man soviel verschiedene Werte wie mit 4 (16=2 4 ) 
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Binärziffern darstellen, nämlich die Werte 0 bis 15. Dennoch 
ist eine Umwandlung ins Binärformat und umgekehrt viel ein¬ 
facher. 1 Byte = 8 Bit = 2 * 4 Bit stellen wir mit zwei Hex- 
Ziffern dar, 1 Adresse = 2 Byte = 16 Bit = 4*4 Bit mit vier 
Hex-Ziffern (zwei Ziffern HB, zwei für LB). Hex-Zahlen wer¬ 
den gekennzeichnet, indem der Zahl das Dollarzeichen »$« 
vorangestellt wird. 

Beispiele: 255 = %11111111 = $FF 

15 = %1111 = $Foder$OF 

4096 = %1000000000000 = $1000 

2459 = %100110010110 = $099B 

Nun rechnen wir noch die Beispielzahl $D01A ins Dezimal¬ 
system um: 

$D01A=$D*16 3 + $0*16 z +$1*16’ + $A*16° 

= $D*4096 + $0*256 + $1*16 +$A*1 

= 13*4096 +0*256 + 1*16 + 10*1 

= 53248 +0 + 16 + 10 

= 53248 + 16 + 10 

= 53274 

Geben Sie »+« und unmittelbar dahinter eine Dezimalzahl 
ein (am »+« erkennt der Monitor, daß es sich um eine Dezi¬ 
malzahl handelt) und drücken Sie < RETURN >. Da vor dem 


Binäre Zahl: %1011101110 


Ziffer 

1 

0 

1 

1 

1 

0 

1 

1 

1 

0 

Stelle Nr. 

9 

8 

7 

6 

5 

4 

3 

2 

1 

0 


%1011101110 = 


0 

*2t0 

(0 

als 

Ziffer 

für 

Stelle 0) 

+1 

* 211 

(1 

als 

Ziffer 

für 

Stelle 

D 

+1 

*2t2 

(1 

als 

Ziffer 

für 

Stelle 

2) 

+1 

*213 

(1 

als 

Ziffer 

für 

Stelle 

3) 

+0 

*2t4 

(0 

als 

Ziffer 

für 

Stelle 

4) 

+1 

*2t5 

(1 

als 

Ziffer 

für 

Stelle 

5) 

+ 1 

*216 

(1 

als 

Ziffer 

für 

Stelle 

6) 

+1 

*217 

(1 

als 

Ziffer 

für 

Stelle 

7) 

+0 

*2t8 

(0 

als 

Ziffer 

für 

Stelle 

8) 

+1 

* 219 

(1 

als 

Ziffer 

für 

Stelle 

9) 


= 0*1 + 1*2 + 1*4 + 1*8 + 0*16 + 1*32 + 
1*64 + 1*128 + 0*256 + 1*512 
= 0 + 2 + 4 + 8 + 32 + 64 + 128 + 512 
= 2 + 4 + 8 + 32 + 64 + 128 + 512 
= 750 


Bild 3. Beispiel zum Rechnen mit Binärzahlen 


Gehen wir von der Binärzahl % 1011011100011101 aus. 


High-Byte 

Low-Byte 

% 

10110111 

00011101 

$ 

B7 

ID 

# 

183 

29 


on 


%1011011100011101 = $ B7 ID = 183*256 + 29 

t f I I 

HB LB $B7 $1D 

Bild 4. Low- und High-Bytes 


»+« kein Monitor-Befehl stand, erkennt er, daß er die Zahl nun 
in andere Zahlensysteme umzurechnen hat. Sie erhalten von 
Ihrer Dezimalzahl dann 

- die Hexadezimaldarstellung mit vorangestelltem »$« 

- wieder die Dezimaldarstellung (vorangestelltes »+«) 

- die Oktaldarstellung (??) mit vorangestelltem »&« 

- und die Binärdarstellung mit vorangestelltem »%« 
Spätestens bei den eingeklammerten Fragezeichen haben 

Sie sicher gemerkt, daß da etwas noch nicht besprochen 
wurde: die Oktaldarstellung. Wie aus der Bezeichnung her¬ 
vorgeht, handelt es sich um das Zahlensystem mit der Basis 
8 (2 3 ). Es ist zwar auch nicht schlecht zum Umgang mit 
Binärzahlen geeignet (3 Bit werden zusammengefaßt und 
ergeben eine Oktalziffer), aber dagegen sprechen mehrere 
Gründe. Erstens, weil wir mehr Stellen benötigen als beim 
Hexadezimalsystem und zweitens, daß das Oktalsystem als 
Zahlensystem veralteter 4-Bit-Computer längst unüblich ist. 
Lassen Sie sich von der oktalen Zahlenangabe mit dem vor¬ 
angestellten »&« also nicht stören. Dieses System werden Sie 
nicht brauchen. 

Im übrigen können Sie auch umgekehrte Umrechnungen 
durchführen; Sie müssen nur das richtige Symbol vor die Zahl 
setzen ($ für hex, % für bin, + für dez, & für okt). Probieren 
Sie einmal folgende Beispiele durch: 

$FF00 

+768 

%10110111011 eingeben und <RETURN> drücken 

$3455 

+3455 

Beachten Sie den Unterschied des Wertes der beiden 
untersten Beispielzahlen; $3455 ist eine Hexadezimalzahl 
mit dem Dezimalwert 13397 und somit größer als die Dezi¬ 
malzahl +3455. 

Weil »fe Hexadezimalzahlen so wichtig sind (daß Sie auch 
praktisch sind, wird sich gleich zeigen), können wir sie auch 
vom Basic aus umrechnen. 

Da hexadezimale Zahlen die Ziffern A bis F enthalten, die 
nicht numerisch im Sinne des Dezimalsystems sind, müssen 
Hexadezimalzahlen in Form von Strings eingegeben werden 
(zum Beispiel A$= "FFFO"), in denen kein »$« vorangestellt 
wird. Die Funktion DEG wandelt den Hex-String dann in eine 
Dezimalzahl um: A=DEO(A$) oder A=DEC("FFF0"). 
PRINT DEC("FC'E2"j ergibt beispielsweise 64738. 

Die umgekehrt ÜmnepbijtUing ist besonders nützlich; sie 
erfolgt über HEX$ ($ deshalb, weil das Ergebnis nur ein 
String sein kann, siehe obem): PRINT HEX$(64738) ergibt 
FCE2. 

Das Argument von HEX$ muß - im Gegensatz zum 
Monitor-Befehl $ - zwischen 0 und 65535 liegen. Das sind 
alle Werte, die sich mit 16 Bit = 2 Byte (LB und HB) = 2*2 
Hex-Ziffern = 4 Hex-Ziffern darstellen lassen. Das Ergebnis 
wird so mit Nullen aufgefüllt, daß es vierstellig ist. 

Dies ist übrigens das praktische an den Hex-Zahlen: Um 
eine Adresse darzustellen, kommt man immer mit vier Stellen 
aus, während man im Binärsystem bis zu 16 und im Dezimal¬ 
system bis zu fünf benötigt. 

Wir können also festhalten, daß für die Angabe von Adres¬ 
sen das Hexadezimalsystem geeigneter ist als das Dezimal¬ 
system. 


Der »Grundbefehl« der Monitore: M 


Der Befehl M, den wir nun kennenlernen wollen, ist der wich¬ 
tigste Befehl eines Monitors. Die Abkürzung M wird daher oft 
als Abkürzung für Monitor verstanden. M kommt aber wohl 
eher von »memory dump« (Speicherauflistung). 
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C 128 


MONITOR 

PC SR flC XR VR SP 
i FB000 00 00 00 00 F8 

>F4000 4C £3 40 4C 09 40 
>F4010 SD 41 20 12 41 20 
>F4020 00 FF FF 20 7R 41 

DRSSELBE MIT 

MONITOR 

PC SR PC XR VR SP 
; FB000 00 00 00 00 FS 

>F4000 4C 23 40 4C 03 40 
>F4008 AS 20 CC FF 20 7R 
>F4010 SD 41 20 12 41 20 
>F4018 R9 00 85 15 58 4C 
>F4020 @0 FF FF 20 7R 41 


4C 4D RS 20 CC FF 20 7R 
38 52 R9 00 85 15 58 4C 
20 51 42 20 45 40 20 9B 

S EVTES F R:O 


4C 

40 


41 

20 


38 

52 

WWftWMiS 

37 

40 

j/mmxwdüi 

20 

51 

KTtiKTOBN 


4i 20 = «üEivtcqwarsvnnm 

37 4D : 

41 RD: 

I L EL 


Bild 5. Beispielausdruck des M-Befehls 


Dieser Befehl ist bei jedem Monitor vorhanden, heißt fast 
immer M und hat auch immer ähnliche Syntax. Sogar die 
Disketten-Monitore, mit ihnen lassen sich Inhalte von Disket¬ 
ten verändern, haben diesen Befehl. 

M erzeugt einen sogenannten »Dump« (Auflistung eines 
Bereichs, ohne bei der Ausgabe zu selektieren, das heißt nur 
bestimmte Werte auszugeben). 

Geben Sie bitte »M F4000 F4020« ein; in Bild 5 und auf 
Ihrem Bildschirm sehen Sie das Ergebnis. Ein »memory 
dump« hat folgendes Format: 

Basisadresse Hex-Angabe der Speicherinhalte: ASCII- 
Zeichen 

Besprechen wir die einzelnen Angaben: 

Das > -Zeichen zeigt an, daß es sich um ein Dump des M- 
Befehls handelt. Dies ist für das Ändern der Speicherinhalte, 
was wir noch besprechen werden, elementar. 

Die Basisadresse wird - was sofort auffällt - mit fünf Hex- 
Ziffern angegeben. Die erste Ziffer gibt die Speicherbank an. 
In diesem Fall ist es $F (dezimal 15), also die Speicherbank 
des ROM-Bereichs. Die folgenden vier Ziffern sind die 
gewöhnliche Hex-Darstellung der Adresse. Auch bei der 
Angabe der Adressen für unser Beispiel haben wir übrigens 
die fünfstellige Angabe gewählt. 

Die Basisadresse gibt an, auf welche Adresse sich die dar¬ 
auffolgenden Angaben beziehen. Der Basisadresse folgen 
nämlich die Hex-Darstellungen der Inhalte aller Adressen - 
beginnend mit der Basisadresse. 

Aus unserem Beispiel (sehen Sie auf Ihren Bildschirm, 
wenn Sie den Beispiel-Befehl eingegeben haben, oder auf 
das bereits erwähnte Bild 5) geht hervor, daß $4C (76) der 
Speicherinhalt der Adresse $4000 (16384) in Bank $F (15) 
ist, $23 (35) der von $4001 (16385) in derselben Bank, $40 
(64) der von $4002 (16386)... $8D (141) ist - siehe nächste 
Zeile des Dumps - der Inhalt von $4010 (16400) und so 
weiter. 

Auf die Hex-Bytes folgt der Doppelpunkt »:«. Dieser zeigt 
an, daß die numerischen Angaben an dieser Stelle aufhören 
und ist vor allem für das Ändern von Speicherinhalten wichtig. 
Der Doppelpunkt wird bei einer Eingabe als Endmarkierung 
einer Anweisung verstanden. 

Dem Doppelpunkt folgt die (inverse) ASCII-Darstellung der 
Speicherinhalte. Falls es sich um Speicherinhalte handelt, die 
nicht als ASCII-Zeichen (Buchstaben, Ziffern, Grafikzeichen) 
darstellbar sind, wird ein reverser Punkt ».« ausgegeben. 
Achtung: Dieser Punkt kann auch für den Code $2E stehen. 
Es empfiehlt sich also, auch die hexadezimalen Werte zu 
betrachten. 

Die ASCII-Darstellung ist vor allem dann wichtig, wenn 
Speicherbereiche, in denen ASCII-Codes abgelegt sind, 


untersucht werden sollen. Geben Sie einmal »M F41BB 
F424B« ein, und Sie finden rechts die Einschaltmeldung des 
CI28 und links die Hex-Darstellung der ASCII-Codes. 

Hier sei auch darauf hingewiesen, daß der M-Befehl - wie 
alle Monitor-Kommandos - durch Drücken von <RUN/ 
STOP > abgebrochen werden kann. 

Nun wollen wir noch die Syntax von M, die bislang bewußt 
übergangen wurde, besprechen. 

Die normale Syntax ist »M Anfangsadresse Endadresse«, 
wobei Anfangs- und Endadresse hexadezimal dargestellt 
werden, solange nichts anderes angegeben wird. Ist die 
Angabe hexadezimal und hat fünf Stellen (Beispiele: F400C, 
10400, 04001), kennzeichnet die höchstwertige Stelle die 
SpeicIr.Tbank (0,1,F). Bei Angaben mit weniger hexadezima¬ 
len Stellen wird die voreingestellte Bank (0) verwendet. 

Als einer der wenigen Monitore überhaupt, bietet TED- 
MON die Möglichkeit, die Parameter auch in anderen Zahlen¬ 
systemen zu übergeben. Wichtige Einschränkung: Die Spei¬ 
cherbank kann nicht eingestellt werden, man kann nur mit der 
voreingestellten Konfiguration (Bank 0) arbeiten. Für Adres¬ 
sen, bei denen die Angabe der Speicherbank überflüssig ist, 
weil sie in dem Bereich liegen, der in allen Bänken gleich ist 
($0000 bis $3FFF oder dezimal 0 bis 16383), kann man 
damit aber ganz gut leben. Um die Adressen dezimal 700 bis 
900 zu dumpen, gibt man einfach »M +700+ 900« ein. Da 
die Adressen dezimal 700 bis 900 in diesem gemeinsamen 
Bereich dezimal 0 bis 16383 liegen, müssen wir nicht die 
Speicherbank angeben und können auch problemlos die 
dezimale Darstellung der Parameter einsetzen. 

Man kann die Parameter für M teilweise weglassen. »M 
+ 700« beispielsweise gibt einen Dump ab 700 aus; es wer¬ 
den zwölf Zeilen (diese Anzahl ist unabhängig von 40- oder 
80-Zeichen-Darstellung) ausgegeben. Anschließend lassen 
sich neue Eingaben machen. Mit M (ohne Parameter!) wird ab 
der letzten Adresse, die bearbeitet wurde, ein Dump ausge¬ 
geben. Dies ist vor allem dann sinnvoll, wenn man die Aus¬ 
gabe über < RUN/STOP > abgebrochen hat und wieder fort¬ 
setzen möchte. 

In Bild 6 finden Sie eine Kurzübersicht zum M-Befehl. 

Wir wollen uns nun ein wenig mit der Funktionsweise des 
M-Kommandos beschäftigen. 

Der Monitor liest die Speicheradresse ähnlich wie der 
PEEK-Befehl im Basic. Diese werden zunächst in hexadezi¬ 
maler Form ausgegeben und dann als ASCII-Zeichen (Steu¬ 
erzeichen als Punkt). Befinden wir uns in der 40-Zeichen- 
Darstellung, werden 8 Byte pro Zeile, bei 80-Zeichen-Dar¬ 
stellung 16 Byte, ausgegeben. 

Listing 1 ist ein Basic-Programm, das den M-Befehl simu¬ 
liert. Es ist natürlich keine echte Alternative zum Monitor, der 
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ja in Assembler geschrieben und folglich viel schneller ist. Am 
Listing kann man sich aber die Wirkungsweise des M-Befehls 
gut veranschaulichen. Die Variable ZL bekommt in Zeile 220 
zunächst den Wert 8. Der Rest der Zeile addiert noch 8 hinzu, 
falls die 80-Zeichen-Darstellung eingeschaltet ist. Dies wird 
anhand der Speicherzelle 215 festgestellt, die dann den Wert 
128 beinhaltet, wenn 80 Zeichen pro Zeile eingestellt sind. 
Das weitere Programm entnimmt aus der Variablen ZL, wie¬ 
viele Bytes pro Zeile angezeigt werden sollen. 

Die Eingaben, die das Programm fordert, müssen mit Aus¬ 
nahme der Bank, die dezimal angegeben wird, hexadezimal 
sein (wie die DEC-Befehle in den Zeilen 250/260 zeigen, die 
die hexadezimale Eingabe in einen dezimalen Wert umwan¬ 
deln, damit das restliche Basic-Programm damit arbeiten 
kann). 

Nun hätten wir die Funktionsweise und die Syntax des M- 
Befehls besprochen. Da M unser erster variantenreicher 
Befehl ist, ging dies noch etwas mühselig; in Zukunft müssen 
wir aber nicht mehr die Unterbrechungsmöglichkeit durch 
< RUN/STOP > oder die Darstellung der Parameter in ande¬ 
ren Zahlensystemen und andere grundsätzliche Dinge 
besprechen. Außerdem sind die anderen Befehle viel einfa¬ 
cher, und oft werden wir uns sehr kurz fassen können. Wenn 
Sie aber mit dem M-Befehl umgehen können, haben Sie eine 
große Hürde in der Anwendung des Monitors genommen. 

Vielleicht haben Sie sich gefragt, was denn der M-Befehl 
für einen Nutzen hat. Diese Frage ist durchaus berechtigt, 
aber wir hoffen, daß die Anwendungsbeispiele, die wir im fol¬ 
genden durchprobieren, zeigen, daß man mittels M an viele 
Informationen herankommt. 


M 

M Anfangsadresse bis Endadresse 
Memory Dump von Anfangsadresse 
bis Endadresse bei Weglassen der 
Endadresse: von der Anfangs¬ 
adresse 12 Zeilen lang bei Weglas¬ 
sen beider Parameter: 

englisches Wort: Memory Dump (Speicherauflistung) 

Bild 6. Kurzübersicht zum Befehl M 

FF000« auf den Bildschirm gebracht werden. Vor allem die 
ASCII-Darstellung auf der rechten Seite des Ausdrucks zeigt 
dann Basic-Befehlswörter, Fehlermeldungen und so weiter. 
Beispiel 2: 

Im Speicher beinhalten manche Adressen wichtige Werte 
für den Computer in Form von Zeigern. Ein Zeiger besteht aus 
zwei Byte, dem Low- und High-Byte einer Adresse. 

Im Zeiger $2D/$2E ($2D enthält das LB, $2E das HB) ist 
die Anfangsadresse des aktuellen Basic-Programms gespei¬ 
chert. Geben wir also »M 2D 2E« ein. Da der Monitor immer 
nur ganze Zeilen anzeigt, erhalten wir nicht nur die beiden 
Werte aus $2D und $2E, sondern auch weitere Zahlen, die 
uns aber an dieser Stelle nicht interessieren. 

Die beiden am weitesten links stehenden Hex-Bytes sind 
natürlich die Inhalte von $2D und $2E, wie wir der Basis¬ 
adresse ($0002D=$2D in Bank $0) entnehmen können. In 
der Regel erhalten wir $01 für $2D. $01 ist also das LB der 
Adresse, ab der das Basic-Programm beginnt. Der zweite 
Wert ist das HB; hierfür erhalten wir direkt nach dem Einschal- 


Befehl: 

Syntax: 

Wirkung: 


Beispiel 1: 

Lassen Sie doch einmal das Betriebssystem anzeigen (das 
Maschinenprogramm, das unmittelbar nach dem Einschalten 
des Computers aktiviert wird und alle softwaremäßigen Vor¬ 
gänge steuert) oder den Basic-Interpreter. Diese beiden Pro¬ 
gramme sind fest eingebaut und können mit »M F4000 


100 REM ***************************** 

110 REM * * 

120 REM * SIMULATION DES MONITORBE- * 

130 REM * * 

140 REM * FEHLS 'M' MITTELS BASIC * 

150 REM * * 

160 REM ***************************** 

170 REM * * 

180 REM * 1986 BY FLORIAN MUELLER * 

190 REM * • 

200 REM ***************************** 

210 : 

220 ZL=B - 8*(PEEK(215)=128): REM ANZAHL DER ZEI 
CHEN PRO ZEILE <8 ODER 16> BESTIMMEN 
230 PRINT CHR*(13) CHR*(13)"MEMORY DUMP MITTELS 
BASICCDOWN>" CHR*(7) 

240 INPUT “SPEICHERBANK <0,1,2,3 ODER 15>";BA 
250 INPUT "ANFANGSADRESSE";AN*: AN=DEC(AN*) 

260 INPUT "ENDADRESSEI4SPACE>";EN*: EN=DEC<EN*> 
270 PRINT CHR*(13)"MEMORY DUMP *";AN*;" - *";EN* 
IN BANK"BA 
280 AD=AN: BANK BA 
290 DO UNTIL AD>EN 
300 s PRINT CHR* <13) 1 
AD) ; 

310 : FOR L=1 
320 s : PRINT 
AD+1 
330 s NEXT L 

340 s PRINT CHR*(18); 

350 s FOR L=AD—ZL TO AD-1 
360 s : I=PEEK<L) 

370 : : IF I<32 OR <I>127 AND I<160) THEN PRINT 
ELSE PRINT CHR*<I); 

380 s NEXT L 
390 LOOP 
400 RUN 

Listing 1. Simulation des M-Befehls in Basic 


■>"; RIGHT*(HEX* <8A),1);HEX* < 


TO ZL 

";RIGHT*(HEX*(PEEK(AD)),2)j s AD= 


ten $1C. Falls wir die hochauflösende Grafik eingeschaltet 
haben, ist es $40. Die Adresse ist also $1C01 beziehungs¬ 
weise $4001, falls der Bereich für hochauflösende Grafik 
reservif • -t ist. 

Mit Hilfe des $-Befehls zur Umrechnung einer Hex-Zahl ins 
Dezimalformat können wir noch die dezimalen Werte berech¬ 
nen lassen. Zur Überprüfung des Ergebnisses können Sie 
mit X ins Basic zurückgehen und dort über »PRINT 
PEEK(45)+256*PEEK(46)« das Ergebnis prüfen, das vom 
genannten Basic-Ausdruck allerdings in dezimaler Form aus¬ 
gegeben wird. 

Die Endadresse des Basic-Programms ist immer in 
$1210/$1211 (dezimal 4624/4625) gespeichert. Mit dem 
Monitor ist also »M 1210 1211« einzugeben. Die weitere 
Behandlung entspricht dem Auslesen des Zeigers ($2D/ 
$2E) auf den Basic-Anfang. 

Vom Basic aus können Sie Ihr Ergebnis diesmal mittels 
»PRINT PEEK(4624)+256 * PEEK(4625)« prüfen. 

In den Ausdrücken zur Berechnung der Zeigerinhalte kön¬ 
nen Sie übrigens gut die Formel Wert = LB + 256* HB« 
erkennen. Bei der Berechnung über den Monitor-Befehl $ 
sehen Sie, daß man im Hexadezimalsystem nur die Stellen 
des HB als erste zwei Stellen, die des LB als letzte zwei Stel¬ 
len einsetzen muß, um den gesamten Wert zu erhalten. 
Beispiele: LB=$12,HB=$34 = Wert = $3412 
LB=$E2,HB=$03 = Wert = $03E2 

Dieses Verfahren, die Stellen des HB als höherwertige Stel¬ 
len einzusetzen, ist mathematisch völlig korrekt; ähnlich geht 
man vor, wenn man im 10er-System bei der Multiplikation 
einer Zahl mit einer Zehnerpotenz die Zahl als linke Stellen, 
die Nullen als rechte Stellen verwendet: 54*100 = 54 00 
=5400 

Abschließend zum M-Befehl (dieses Kommando werden 
wir nun dauernd verwenden) noch zwei Hinweise. 

Schalten Sie einmal auf die 40-Zeichen-Darstellung um 
und geben »M + 1024+2023« ein. Was auf dem Bildschirm 
erscheint, ist nichts anderes als der Inhalt des 40-Zeichen- 
Bildschirmspeichers. Ein Auslesen des 80-Zeichen-Bild- 
schirmspeichers ist mit dem Monitor leider nicht möglich. 
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Zweiter Hinweis: Wenn das Basic-Programm in Form eines 
Hex-Dumps ausgegeben werden soll, können Sie die Para¬ 
meter (Anfangs- und Endadresse) so herausfinden, wie wir 
es schon beim Auslesen der entsprechenden Zeiger getan 
haben. Sie werden fast das ganze Programm bei der ASCII- 
Darstellung wiederfinden, aber kein Befehlswort. Diese wer¬ 
den nämlich als I-Byte-Werte (sogenannte Token, mehr dar¬ 
über später) im Speicher abgelegt, die dann meist als Grafik¬ 
zeichen erscheinen. Der Basic-Befehl LIST muß diese Token 
erst mit Hilfe einer Berechnungsroutine und einer Umwand¬ 
lungstabelle in Klartext - die Befehlswörter - umwandeln, der 
bei LIST ausgegeben wird. Der Grund für diese Prozedur ist, 
daß I-Byte-Werte leichter und schneller bearbeitet werden 
können als mehrere Bytes umfassende Befehlswörter. 

Das Ändern von Speicherzellen 
mit Memory Dump 


Im letzten Abschnitt wurde Ihnen für die Anzeige von > am 
Anfang jeder Dump-Zeile nur die Erklärung gegeben, daß die¬ 
ses Zeichen es zuläßt, die Speicherinhalte der angezeigten 
Adressen zu ändern. 

Geben Sie bitte »M 1008« ein; Sie werden sehen, daß in 
diesem Bereich die Belegungen der Funktionstasten gespei¬ 
chert sind. Wenn Sie nun mit dem Monitor die angezeigten 
Speicherinhalte ändern wollen, geht dies ganz einfach: 
Gehen Sie mit dem Cursor auf die Stelle, die geändert werden 
soll, und führen Sie die Änderung durch. Sie können sowohl 
die Adresse als auch die Hex-Bytes ändern. Das Ändern der 
ASCII-Codes wird ignoriert. Drücken Sie dann < RETURN > 
zur Bestätigung, und die Änderungen werden übernommen. 
Die Zeile wird noch einmal ausgegeben, damit auch die 
ASCII-Codes an die neuen Speicherinhalte angepaßt wer¬ 
den. 

Daß auf so einfache Weise ein Speicherinhalt geändert 
werden kann, ist darin begründet, daß das > -Zeichen am 
Anfang der Zeile ein gültiger Monitor-Befehl ist. 

Seine Syntax ist > Basisadresse Speicherinhalte, zum 
Beispiel > 100A 42 45 49 53 50 (siehe Bild 7). 

Wenn Sie jedoch die Anzeige unseres Beispiels »M F4000 
F4020« ändern wollen, erkennen Sie an der nochmaligen 
Anzeige der Zeile, daß die Änderungen nicht übernommen 
wurden. Die Erklärung ist ganz einfach: Es handelt sich um 
einen Speicher, der nicht beschreibbar ist. Da fast alle Spei¬ 
cherzellen in Bank 15 ($F) ROM-Speicherzellen sind, kann 
man die Adressen $4000 bis $4020 in Bank $F nicht 
ändern, denn die grundlegende Eigenschaft von ROM-Spei¬ 
chern ist die, daß seine Inhalte nicht geändert werden kön¬ 
nen. 

Die Abkürzung ROM ist Ihnen unter Umständen noch nicht 
bekannt, weshalb wir hier die Begriffe ROM und RAM bespre¬ 
chen wollen. 

Der Großteil des Speichers unseres CI28 ist RAM (Ran¬ 
dom Access Memory). Random Access Memory heißt, daß 
es sich um Speicher handelt, auf den in beliebiger Form zuge¬ 
griffen werden kann. RAM-Speicherzellen können also 
sowohl beschrieben als auch ausgelesen werden. Daher 
übersetzt man RAM mit »Schreib/Lese-Speicher«. 


Befehl: > 

Syntax: >Basisadresse Bytel Byte2 ... 

ByteX 

Wirkung: Im Speicher werden ab der Basis¬ 

adresse die der Basisadresse 
folgenden Bytes abgelegt, 
englisches Wort: - 

Bild 7. Kurzübersicht zum Befehl > 


Der Nachteil des RAM-Speichers ist, daß er beim Aus¬ 
schalten des Computers gelöscht wird. Darum ist der RAM- 
Speicher für ein Betriebssystem, das man ja immer benötigt, 
ungeeignet. 

ROM-Speicher (Read Only Memory) kann - wie die engli¬ 
sche Bezeichnung »read only« sagt, nur gelesen werden, 
Schreibzugriffe sind dagegen nicht möglich. Der große Vor¬ 
teil ist, daß die Daten im ROM beim Ausschalten nicht ver¬ 
loren gehen. 

Das Programm, auf das der Computer immer wieder 
zugreift, nämlich das Betriebssystem, ist im ROM gespei¬ 
chert. 

Kurz: Es besteht keine Möglichkeit, bestimmte Speicher¬ 
zellen zu ändern; dies wäre allerdings auch nicht sinnvoll. 

Das Überschreiben von RAM-Zellen ist eine Anwendung, 
die wir noch etwas genauer besprechen wollen, zum Beispiel 
das Ändern von ASCII-Tabellen (also reiner Text) in Maschi¬ 
nenprogrammen. 

Beim Ändern von solchen Maschinenprogrammen 
(genauer gesagt: der ASCII-Tabellen solcher Maschinenpro¬ 
gramme) geht man in drei Schritten vor: 

1. Programm mittels DLOAD oder BLOAD laden 

2. Vom Monitor aus Änderungen durchführen 

3. Monitor verlassen (X) und das Programm mittels DSAVE 
oder BSAVE speichern. 

Uns wird hier natürlich der zweite Schritt am meisten inter¬ 
essieren, zunächst aber wollen wir klären, welche Pro¬ 
gramme wir bei unserem jetzigen Kenntnisstand bearbeiten 
können und woran man ein Maschinenprogramm erkennt. 

Vorher noch zwei wichtige Hinweise. Erstens: Sie benöti¬ 
gen, wie gesagt, keine Maschinensprache-Kenntnisse, es 
reicht, wenn Sie diesen Kurs bis zu dieser Stelle verfolgt 
haben .weitens: Natürlich kann man auch Basic-Programme 
mit dem Monitor ändern, doch gibt es dazu ja den Basic- 
Editor, der viel komfortabler ist. Lediglich für spezielle Ände¬ 
rungen an Basic-Programmen benötigt man den Monitor, und 
das werden wir an späterer Stelle behandeln. 

Die Maschinenprogramme, die wir schon manipulieren 
können, müssen bestimmte Bedingungen erfüllen: 

1. Das Programm muß mindestens aus einer Basic-Zeile be¬ 
stehen, die beim LISTen erscheint (zum Beispiel eine Zeile 
»1986 SYS 7183« oder »1986 SYS PEEK(45)+256* 
PEEK(46)+350«). 

2. Das Programm muß mit dem Basic-Befehl RUN gestartet 
werden können (zum Beispiel mit RUN "FILENAME" 
oder DLOAD "FILENAME" und anschließendem RUN). 

3. Das Programm muß mit DLOAD ladbar sein (und zwar so, 
daß man es danach mit RUN starten kann). 

4. Das Programm muß nach dem Laden über DLOAD auch 
mit DSAVE gespeichert werden können. 

Laden Sie nun bitte ein beliebiges Programm, das Sie mani¬ 
pulieren wollen. 

Springen Sie dann mit < F8 > in den Monitor und dumpen 
Sie ab der Anfangsadresse des Basic-Programms (in der 
Regel $1001) bis zur Endadresse. Wie man Anfangs- und 
Endadresse eines Basic-Programms im Speicher mit dem 
M-Befehl feststellt, hat der letzte Abschnitt gezeigt. 

Wenn Sie beim Dump eine Stelle finden, an der interes¬ 
sante ASCII-Codes abgelegt sind, drücken Sie zur Unterbre¬ 
chung des Dumps einfach < RUN/STOP >. Nehmen wir an, 
Sie haben folgende Zeile entdeckt: 

>01F85 28 43 29 20 31 39 38 36 20 42 59 20 58 59 5A 
0D:(C) 1986 BY XYZ. 

Die ASCII-Darstellung, rechts vom Doppelpunkt, erscheint 
bei Ihnen natürlich invers. Außerdem werden Sie nach »M 
1F85« diese fiktive Zeile nicht erhalten. 

Diese Zeile soll uns nur als ausführliches Beispiel dienen, 
wie man Änderungen durchführt. 
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Wenn Sie das Beispiel verfolgen wollen, geben Sie einfach 
die oben stehende Zeile bis zum Doppelpunkt so ein, wie Sie 
dort steht; dann speichern Sie aber ein eventuell vorher gela¬ 
denes Programm nach den Änderungen nicht, denn Sie 
haben es unter Umständen durch diese Zeile zerstört! 

Nun wollen wir an unserer Beispielzeile eine kleine Textän¬ 
derung durchführen, weil uns das Copyright stört. Unser 
neuer Text soll nun »NO COPYRIGHT!!!« lauten. Das letzte 
Byte ($0D=13) soll bestehen bleiben, da es sich um ein 
wichtiges Steuerzeichen handelt. 

Um die Änderung durchzuführen, fahren wir mit dem Cur¬ 
sor auf die erste 2 (im Hex-Byte $28 am Änfang der Zeile) 
und überschreiben jetzt 15 Hex-Byte mit den ASCII-Codes 
unserer neuen Meldung: 

4E 4F 20 43 4F 50 59 52 49 47 48 54 21 21 21 

Nach der Bestätigung durch < RETURN > wird die Zeile 
neu aufgebaut und wir sehen nun folgendes Bild: 

>01F85 4E 4F 20 43 4F 50 59 52 49 47 48 54 21 21 21 
OD:NO COPYRIGHT!!!. 

An den ASC jl-Codes können wir sofort und bequem erken¬ 
nen, daß die Änderung korrekt durchgeführt wurde. 

Nach dieser großen Manipulation fällt uns ein, daß der Text 
so viel schöner wäre: »NO COPYRIGHTS.«, wobei der Punkt 
am Ende des Textes wirklich erscheinen soll und kein Steuer¬ 
zeichen ist! 

Diesmal müssen wir nicht gleich eine ganze Zeile ändern, 
es reicht, an den letzten Bytes folgende Änderungen durch¬ 
zuführen: 

1. das erste $21-Byte soll zum »S« werden 

2. das zweite $21-Byte soll zum Leerzeichen » « werden 

3. das dritte $21-Byte soll zum Punkt ».« werden 

Da wir nur drei von 16 Byte ändern müssen, lohnt es nicht, 
die ganze Zeile neu zu schreiben. Wir fahren nur mit dem Cur¬ 
sor auf das erste $21-Byte, überschreiben es mit »53«, dem 
Code für »S«, (das war Änderung 1, siehe oben). Dann fahren 
wir mit dem Cursor auf das zweite $21-Byte auf die Ziffer 1 
und überschreiben sie mit »0«, wir erhalten $20, den Code 
oder ein Leerzeichen (das war Änderung 2, siehe oben). Zu 
guter Letzt fahren wir auf die Ziffer 1 des nächsten $21-Bytes 
und überschreiben es mit »E«, so daß sich der Punkt-Code 
$2E ergibt. Nach diesen Änderungen drücken wir 
< RETURN > und erhalten folgende Zeile: 

>01F85 4E 4F 20 43 4F 50 59 52 49 47 48 54 53 20 2E 
OD:NO COPYRIGHTS .. 

Wir sehen auch hier, daß die Änderung übernommen 
wurde. Aber halt, da soll doch nur ein Punkt ausgegeben wer¬ 
den und rechts vom Doppelpunkt sind gleich zwei vorhan¬ 
den. 

Nein, natürlich ist alles richtig: Der erste Punkt steht für den 
Code $2E, der zweite symbolisiert das nicht-druckbare Byte 
$0D und erscheint nicht wirklich. Hier kann man gut erken¬ 
nen, daß in der ASCII-Darstellung Punkt nicht gleich Punkt ist; 
auf das Hex-Byte kommt es an (nur ein $2E-Byte ist ein ech¬ 
ter Punkt). 

Gezielte Suche nach Bytes 
über den H-Befehl 


Wenn Sie ein Programm mit dem M-Befehl durchforsten 
und/oder ändern wollen, werden Sie bald merken, daß die 
Suche nach bestimmten Stellen innerhalb des Programms 
auf die Dauer recht mühselig ist. 

H ist die Abkürzung des englischen Verbs »to hunt«, wel¬ 
ches »jagen« heißt. 

Die Syntax ist »H Anfangsadresse Endadresse Bytel 
Byte2 Byte3 ... ByteX« (Kurzübersicht zum H-Befehi in Bild 
8), wobei die Anzahl der Bytes frei wählbar ist; mindestens 


ein Byte muß im durch Anfangs- und Endadresse umgrenzten 
Speicherbereich gesucht werden. Die Obergrenze für die 
Anzahl der Bytes ist einfach die Zeilenlänge (zwei Zeilen auf 
dem 80-Zeichen-Bildschirm, bei 40-Zeichen vier). 

Der Monitor gibt auf den H-Befehl hin alle die Adressen im 
fünfstelligen Hexadezimalformat aus, ab denen die 
gewünschte Bytefolge gefunden wurde. Sehen wir uns den 
neuen Befehl, auf den Sie bald nicht mehr verzichten wollen, 
an einem Beispiel an. Geben Sie dazu bitte »H F0000 F5000 
52 45 53 54« ein. 

Der Monitor gibt dann die Adressen F0A80 und F4443 als 
Ergebnis seiner Suche aus. Mit M können Sie nachprüfen, ob 
an den angegebenen Adressen wirklich die Bytes $52 $45 
$53 $54 stehen. Zur Adresse F0A80 ist eine wichtige 
Anmerkung zu machen: 

Wenn die Adresse x0A80 (x deshalb, weil die Speicher¬ 
bank bei Adressen, die in dem Bereich liegen, der allen Bän¬ 
ken gemeinsam ist, uninteressant ist) nach dem H-Befehl auf 
dem Bildschirm erscheint, ignorieren Sie bitte diese Angabe! 
Sie werden feststellen, daß immer, wenn die Adressen ab 
$0A80 im Suchbereich liegen, x0A80 als Ergebnis gemel¬ 
det wird. Ab dieser Adresse merkt sich nämlich der Monitor 
die Bytes, die gesucht werden sollen. Klar, daß ein Vergleich 
dieses Monitor-Suchpuffers mit sich selbst ein positives 
Suchergebnis ergibt! 

Eigentlich gehört dieser Hinweis ins Handbuch, aber auch 
die Anleitungen der uns bekannten C64-Monitore enthalten 
keinen ähnlichen Hinweis. Die Adresse des »Suchpuffers« ist 
von Monitor von Monitor verschieden; dieser läßt sich jedoch 
ausfindig machen, und wir möchten Ihnen an dieser Stelle 
das Verfahren vorstellen, mit dem man den Bereich des Puf¬ 
fers feststellen kann. Dieses Verfahren wird für Sie eine gute 
Übung im Umgang mit dem Monitor-Kommando H sein. 

Su. Len Sie nach einer seltenen Bytefolge wie $D0 $E0 
$F0 $00 $10 im ganzen Speicher: 

H 00000 FFFFF DO EO FO 00 10 

Nacheinander werden Sie alle möglichen Adressen erhal¬ 
ten, die sich (mit 99prozentiger Sicherheit) nur in der Spei¬ 
cherbank unterscheiden, die Adreßangabe wird (fast) immer 
gleich sein. Sollten nicht alle angezeigten Adreßangaben 
gleich sein, suchen Sie noch nach einer anderen Bytefolge 
wie$E1 $D1 $F1 $01 $11. Streichen Sie (am Bildschirm ein¬ 
fach mittels der DEL-Taste) alle Adreßangaben weg, die nicht 
bei beiden Suchbefehlen gemeldet wurden. Die einzige 
Adresse, die übrigbleibt, ist dann eindeutig die Anfangs¬ 
adresse des Monitor-Suchpuffers. 

Falls bei unserem Suchverfahren etwas unklar war, sei 
noch der Hinweis gegeben, daß wir die Angabe der Bank 
ignorieren müssen; $F0A80 ist also nichts anderes als 
$00A80 und $10A80. 

Bei unserem ersten Beispiel dieses Abschnitts haben wir 
über »H F0000 F5000 52 45 53 54« übrigens nach der 
ASCII-Fölge »REST« gesucht. Die Suche nach ASCII-Zeichen 
wird eine der häufigsten Anwendungen des H-Befehls sein. 
Damit Ihnen dies leichter fällt, ist im TEDMON auch die Mög- 


Befehl: 

H 

Syntax: 

H Anfangsadresse Endadresse 

Bytel ... ByteX 

oder 

H Anfangsadresse Endadresse 
" Suchtext 

Wirkung: 

sucht nach den Bytes oder den 
ASCII-Codes des Suchtextes im 
Bereich von Anfangsadresse bis 
Endadresse. 

englisches Wort: 

Hunt (englisch jagen) 


Bild 8. Kurzübersicht zum Befehl H 



36 


SONDERHEFT 10 







C 128 


GRUNDLAGEN 


lichkeit gegeben, nach ASCII-Codeszu suchen. Diese wurde 
Ihnen bislang vorenthalten, aber jetzt sollen Sie es späte¬ 
stens erfahren (in der Kurzübersicht wurde dafür diese Mög¬ 
lichkeit schon genannt). 

Wenn Sie im Bereich von $0000 bis $5000 in Bank $F 
(dezimal 15) suchen lassen wollen, ist auch folgende Ein¬ 
gabe möglich: 

H FOOOO F5000 'REST 

Das Apostroph signalisiert dem Monitor, daß ein ASCII-Text 
folgt, der vor der Suche in die entsprechenden Bytes umzu¬ 
wandeln ist. Leider existiert diese Eingabemöglichkeit nur 
beim H-Befehl, obwohl man sie bei einigen anderen Komman¬ 
dos sicher auch gerne hätte. Hier könnte man sich unter 
Umständen mit dem Suchpuffer behelfen, da die Zeichen in 
ihm schon in umgewandelter Form vorliegen. 

Die ASCII-Codes 


Schon beim M-Befehl wurden die ASCII-Codes angespro¬ 
chen, allerdings ohne Erklärung. 

Wie wir schon erwähnt haben, erkennt der Computer nicht 
die Zahlen und Zeichen so wie wir (wenn wir sie am Bild¬ 
schirm sehen), sondern stellt Zahlen als elektronische 
Signale im Binärformat dar: Strom ein ist gleich »Bit gesetzt« 

(1), Strom aus entspricht »Bit gelöscht« (0). 8 Bit zusammen¬ 
gefaßt erlauben 256 verschiedene Kombinationen (1 bis 
255 und die 0), und ein solches Byte kann mit zwei Hexadezi¬ 
malziffern dargestellt werden. Da der Computer zunächst 
einmal nur mit Zahlen rechnen kann, stellt er auch Zeichen 
(wie die Buchstaben und Grafikzeichen, aber auch die Ziffern 
wieO, 1,... 9) als elektronische Signale-effektiv also als Zah¬ 
len - dar. 

Dazu ein Beispiel: 

A = %01000001 =$41 = # 65 (# verwenden wir fortan 
als Symbol für Dezimalzahlen, da es das geläufigste ist. Die- ‘H'fluh /■ W 



ses Symbol kennt der TEDMON jedoch nicht). 


100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 


REM ********************* 
REM * * 
REM * ASCII - TABELLE * 
REM * * 
REM ********************* 
REM * * 
REM * FLORIAN MUELLER * 
REM * * 
REM ********************* 


ODER BILDSCHIRM (B)" 
AND A*< >"B" 


INPUT "SEKUNDAERADR 


260 

270 


290 

300 

310 

320 

330 

340 


360 

370 


410 

420 

430 


DO s INPUT "DRUCKER (D) 
;A*s LOOP WHILE A*<>"D" 
IF A*="D" THEN BEGIN 
INPUT "BERAETENUMMER";B s 
ESSE" ;'S 

OPEN 4,S,S: CMD 4 
BEND 


LE*=CHR*<32>: REM LEERZEICHEN 
Z*="0123456789ABCDEF"s REM ZIFFERN FUER HEX¬ 
ZAHLEN 

PRINT SPC(2); 

: 

FOR J = 1 TO 16 
: PRINT MID*(Z*,J,1>;LE»; 

NEXT J 
PRINT 

FOR J = 0 TO 15 
: PRINT MID*(Z*,J+l,1>;SPC(5) 

: FOR K = 2 TO 15s IF K>7 AND-K<10 THEN 400 
: s PRINT CHR*(J+ <K»16));LE*; 
s : IF K=7 THEN PRINT LE*;LE»;LE*;LE*; 
s NEXT K 
s PRINT 
NEXT J 

IF A*="D" THEN PRINT# 4s CLOSE 4 


Listing 2. Erstellen einer ASCII-Tabelle 
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Statt PRINT "A" können wir in Basic auch PRINT 
CHR$(65) oder PRINT CHR$(DEC("41 ")) schreiben. 

Der CHR$-Befehl gibt nämlich zu einem ASCII-Code das 
betreffende Zeichen aus. Wenn Sie unser Beispielprogramm 
»M-Simulation« (Listing 1) ansehen, finden Sie bei der Aus¬ 
gabe der ASCII-Darstellung, die in den Zeilen 340 bis 380 
erfolgt, den CHR$-Befehl wieder. 

Das Gegenstück ist der ASC-Befehl: PRINT ASC("A") 
ergibt 65. ASC sind die ersten drei Buchstaben der Abkür¬ 
zung ASCII. ASCII heißt »American Standard Code for Infor¬ 
mation Interchange«, übersetzt ins Deutsche »Amerikani¬ 
sche Standardcodierung für den Datenaustausch«. Das Ziel 
dieser Codierung war, daß verschiedene Geräte Zeichen 
untereinander ohne Probleme austauSchen können. Leider 
ist dieses Vorhaben gescheitert, denn viele Hersteller wei¬ 
chen davon ab und verwenden eigene Codierungen. Wenig¬ 
stens sind die ASCII-Codes der Commodore-Geräte unter¬ 
einander einheitlich, sonst könnten Sie nicht einmal ein 
C64-Basic-Programm im C128-Modus laden. 

Im Handbuch finden Sie im Anhang eine Tabelle der ASCII- 
Codes. Listing 2 gibt eine hexadezimale Tabelle der ASCII- 
Codes aus. Lassen Sie sich am besten die Tabelle auf dem 
Drucker ausgeben und hängen diese in der Nähe Ihres Com¬ 


Steuerzeichen 

ASCII-Code 

Unterstreichen ein * 

$02 

= 

# 2 

Zeichenfarbe auf weiß stellen 

$05 

= 

# 5 

Klingelzeichen 

$07 

= 

# 7 

Tabulator 

$09 

= 

# 9 

Zeilenvorschub LINE FEED (LF) 

$0A 

= 

# 10 

SHIFT/C= blockieren 

$0B 

= 

# 11 

SHIFT/C= wieder entriegeln 
CARRIAGE RETURN 

$0C 

= 

;4 2 -} c 

(Wagenrückl.) 

$0D 

= 

# 13 

Text-Zeichensatz ein 

$0E 

= 

# 14 

Blinkmodus ein * 

CURSOR DOWN (Cursor 

$0F 

— 

# 15 

runter) 

$11 

= 

# 17 

REVERS ON (Revers ein) 

$12 

= 

# 18 

HOME (Cursor nach links oben) 

$13 

= 

# 19 

DELETE (Zeichen löschen) 

$14 

= 

# 20 

TAB (Tabulator setzen/löschen) 

$18 

= 

# 24 

ESCAPE (Sonderfunktionen) 
CURSOR RIGHT (Cursor 

$1B 

= 

# 27 

rechts) 

$1D 

= 

# 29 

Zeichenfarbe orange 

$81 

= 

#129 

Unterstreichen aus * 

$82 

= 

#130 

SHIFT RETURN 

$8D 

= 

#141 

Grafik-Zeichensatz ein 

$8E 

= 

#142 

Blinkmodus aus * 

$8F 

= 

#143 

Zeichenfarbe schwarz 

$90 

= 

#144 

CURSOR UP (Cursor rauf) 

$91 

= 

#145 

REVERS OFF (Revers aus) 

$92 

= 

#146 

CLEAR (Bildschirm löschen) 

$93 

= 

#147 

INSERT (1 Zeichen einfügen) 

$94 

= 

#148 

Zeichenfarbe braun 

$95 

= 

#149 

Zeichenfarbe hellrot 

$96 

= 

#150 

Zeichenfarbe grau 1 

$97 

= 

#151 

Zeichenfarbe grau 2 

$98 

= 

#152 

Zeichenfarbe hellgrün 

$99 

= 

#153 

Zeichenfarbe hellblau 

$9A 

= 

#154 

Zeichenfarbe grau 3 

$9B 

= 

#155 

Zeichenfarbe purpur 

$9C 

= 

#156 

CURSOR LEFT (Cursor links) 

$9D 

= 

#157 

Zeichenfarbe gelb 

$9E 

= 

#158 

Zeichenfarbe türkis 

$9F 

= 

#159 


Bild 9. Steuerzeichen und ihre ASCII-Codes 


puters auf. Sie werden diese Tabelle noch oft brauchen. 

Diese Tabelle umfaßt allerdings nicht die sogenannten 
Steuerzeichen. Zu den Codes $00 bis $1F sowie $80 bis 
$9F sind darum auch keine Zeichen ausgegeben. Bei $20, 
$A0 und $E0 finden Sie auch kein Zeichen. Hier handelt es 
sich jedoch nicht um Steuerzeichen, sondern um die Codes 
für das Leerzeichen. 

Steuerzeichen - auch nichtdruckbare Zeichen genannt - 
lassen sich auch über PRINT ausgeben. Sie erzeugen also 
nicht direkt ein Zeichen, sondern rufen eine Steuerfunktion 
hervor. PRINT CHR$(7) erzeugt beispielsweise das akusti¬ 
sche Klingelzeichen. 

Die Steuerfunktionen finden Sie in Bild 9 zusammengefaßt. 
Wenn wir mit dem Monitor Basic-Programme gegen LISTen 
schützen wollen, werden Sie merken, was sich mit den Steu¬ 
erzeichen alles anstellen läßt! 

Lediglich zum Steuerzeichen »ESC« möchten wir noch 
einige Hinweise geben. Wenn Sie den ESC-Code (#27 = 
$1B) senden, wird das nächste Zeichen, das über PRINT 
gesendet wird, als ESC-Anweisung (zum Beispiel »A« zum 
Einschalten des automatischen Einfügemodus) behandelt. 
Damit werden wir uns noch genauer beschäftigen. 

Wir wollen aber zunächst nach ASCII-Zeichen suchen (mit 
dem H-Befehl). Dazu ist eine Umwandlung in den ASCII-Code 
erforderlich, die Ihnen mit einiger Übung leicht fallen wird. 

Für viele Zeichen gibt es einfache Regeln, um den ASCII- 
Code zu bestimmen: 

Bei Ziffern (0 bis 9) wird einfach $30 dazugezählt: Bei¬ 
spiele: 0 = $30, 5 = $35, 9 = $39. 

Ähnlich geht es bei den Satzzeichen, die Sie über 
<SHIFT+Zifferntaste> erreichen (! = <SHIFT+1 >): 

In diesem Fall wird statt der $30 eine $20 dazugezählt. Bei¬ 
spiele: ! = <SHIFT+1 > = $21; " = <SHIFT+2> = $22; 
( = * 3HIFT+8 > = $28. 

Wenn wir nach dem Text »)1977« suchen wollen, der ja in 
der Einschaltmeldung des CI28 (»(C)1977 MICROSOFT 
CORR«) vorkommt, geht dies folglich über H F4000 FF000 
28 31 39 37 37. 

Wir suchen nur im ROM-Bereich (Bank 15 ab $4000), da 
die Einschaltmeldung logischerweise dort steht (sie muß ja 
auch nach dem Ausschalten des Computers vorhanden sein 
und darf deshalb nicht im RAM stehen). 

Die Eingabemodi des Betriebssystems 


ln diesem Abschnitt befassen wir uns ein wenig mit der Ein¬ 
gabe der Zeichen und der Umwandlung der Tastatureingaben 
in den ASCII-Code. Dies ist ein Thema, das zwar nur am 
Rande zum Bereich Monitor gehört, aber trotzdem viele inter¬ 
essante Informationen vermittelt. 

Wenn Sie sich im Basic-Editor befinden, wird einfach jedes 
Zeichen, das Sie über Tastatur eingeben, direkt auf dem Bild¬ 
schirm ausgegeben. Nebenbei wird noch der Cursor ange¬ 
zeigt. 

Beispiel: Sie drücken auf die Taste < A>, und A erscheint 
auf dem Bildschirm. Sie drücken <SHIFT> und die 
< CLR/HOME > -Taste und der Bildschirm wird wie mit PRINT 
CHR$(147) gelöscht. Sie sehen also, daß hier jedes Zeichen 
- auch Steuerzeichen für Cursor etc. - ausgegeben wird. 
Eine Eingabe wird mit < RETURN > abgeschlossen. 

Diesen Eingabemodus nennt man »normal mode« (norma¬ 
ler Modus), da - wie gesagt - jedes Zeichen direkt ausgege¬ 
ben wird und Steuerzeichen wie CLR/HOME direkt ausge¬ 
führt werden. 

Ein anderer Modus ist der sogenannte »quote mode« 
(Anführungszeichen-Modus oder Hochkomma-Modus). In 
diesem befindet man sich, wenn ein Anführungszeichen aus¬ 
gegeben wird. Wird allerdings ein zweites ausgegeben, 
befindet man sich wieder im »normal mode«. 
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T 

T Anfangsadresse Endadresse 
Zieladresse 

verschiebt Bereich von Anfangs¬ 
adresse bis Endadresse zur 
Zieladresse. 

englisches Wort: Transfer (übertragen, verschieben) 

Bild 10. Kurzübersicht zum Befehl T 

Wie bei allen Eingabemodi wird die Eingabe mit 
< RETURN > abgeschlossen. Tippen Sie bitte einmal fol¬ 
gende Zeichen ein (im Basic-Editor, nicht im Monitor): 

10 PRINT " 

Drücken Sie nicht die < RETURN > -Taste! Denn wenn Sie 
sie drücken, so haben Sie Ihre Eingabe abgeschlossen. Es 
ist egal, in welchem Eingabemodus Sie die Zeichen eingege¬ 
ben haben. »10 PRINT« wurde im »normal mode« eingegeben 
und nach dem »"« befanden Sie sich im »quote mode«. 

Der große Unterschied zwischen »quote mode« und »nor¬ 
mal mode« ist der, daß im »quote mode« Steuerzeichen (wie 
CLR/HOME) - mit Ausnahme von ESC und DEL - nicht aus¬ 
geführt werden, sondern als inverse Zeichen - meist Grafik¬ 
zeichen - erscheinen. Statt des Bildschirmlöschens wird, 
wenn Sie nach der oben stehenden Eingabe auf 
<SHIFT+CLR/HOME> drücken, ein inverses Herz ausge¬ 
geben. Der Sinn des »quote mode« ist der, in Strings - die ja 
zwischen zwei Anführungszeichen stehen - Steuerzeichen 
einzubauen. Wenn Sie die Zeile 10 PRINT "inverses Herz" 
nämlich ausführen lassen, befindet sich das Programm nicht 
im »quote mode« und der Bildschirm wird gelöscht. Beim 
LISTen hingegen steht das Steuerzeichen in Anführungszei¬ 
chen und wird daher invers dargestellt und nicht ausgeführt. 

Ein wichtiger Hinweis noch zum »quote mode«: Er ist immer 
dann aktiv, wenn eine ungerade Zahl von Anführungszeichen 
ausgegeben wurde. Dabei ist es unbedeutend, ob diese in 
der Zwischenzeit mittels DEL gelöscht wurden. 

Der dritte Eingabemodus ist der »insert mode«, der Einfü- 
gemodus. In diesen gelangen Sie durch Drücken von 
<SHIFT+INS/DEL>. Der Einfügemodus wird dann been¬ 
det, wenn pro gedrücktes <SHIFT+INS/DEL> ein Zeichen 
eingegeben - und damit eingefügt - wurde. 

Innerhalb des Einfügemodus gelten die gleichen Regeln 
wie im Anführungsmodus. Wenn Sie im Normalmodus auf 
eine Steuertaste (Cursor-Tasten, CLR/HOME,..) drücken, 
wird die Steuerfunktion ausgeführt, im »quote mode« und im 
»insert mode« hingegen nicht - es erscheint zum Beispiel ein 
inverses Herz. 

Im »insert mode« ist zusätzlich DEL außer Kraft gesetzt. 

Der vierte und letzte Eingabemodus ist der »auto insert 
mode«, der automatische Einfügemodus, in den Sie über 
<ESC> und <A> gelangen und aus dem Sie mittels, 
<ESC> und <C> wieder herauskommen. In diesem 
Modus sind die Steuertasten nach wie vor wirkungsvoll; es 
handelt sich also um einen Normalmodus, bei dem die Zei¬ 
chen eingefügt werden. Dieser Eingabemodus ist für unsere 
Zwecke nicht so ergiebig und soll nicht weiter behandelt 
werden. 

Von jetzt an werden wir neue Befehle kennenlernen, denn 
je mehr Werkzeug in Form von Monitorbefehlen zur Verfü¬ 
gung stehen, desto besser können wir als direkte Folgeer¬ 
scheinung mit unserem CI28 arbeiten! 

Der nächste Befehl dient zum Verschieben von Speicher¬ 
bereichen. Dies ist eine der Grundfunktionen eines Monitors. 

Man kann einen Monitor auch als Textverarbeitung für den 
Speicher, also als Speicherverarbeitung ansehen, die eine 
komfortable Behandlung des Speichers ermöglicht (beque¬ 
mer als über POKE, PEEK und BANK). So wie eine Textverar¬ 
beitung eine Kopierfunktion für Textbereiche haben sollte, 


kommt man auch mal in die Lage, einen Speicherbereich 
kopieren zu müssen. 

Der entsprechende Befehl des TEDMON heißt »T«. T 
kommt vom englischen Wort »transfer«, welches die deut¬ 
sche Bedeutung »übertragen« hat. Die Syntax lautet: 

T Anfangsadresse Endadresse Zieladresse 

Anfangsadresse und Endadresse begrenzen den Original¬ 
bereich, der kopiert werden soll. Der Zielbereich wird nur 
durch die Zieladresse bestimmt, die die Anfangsadresse des 
Zielbereichs ist. Die Endadresse des Zielbereichs kann der 
Monitor selbst ausrechnen, denn die Länge des zu verschie¬ 
benden Bereichs ist ihm durch Anfangsadresse und End¬ 
adresse indirekt mitgeteilt worden. 

Alle nötigen Informationen zum T-Befehl finden Sie in Bild 
10 (Kurzübersicht). 

Zum T-Befehl ist aber noch eines zu sagen: Maschinenpro¬ 
gramme sind nach dem Verschieben nicht unbedingt lauffä¬ 
hig! Die Programme würden nur dann laufen, wenn keine 


100 REM ***************************** 

110 REM * * 

120 REM * SIMULATION DES MONITORBE- * 

130 REM * * 

140 REM * FEHLS 'T' MITTELS BASIC * 

150 REM * * 

160 REM ***************************** 

170 REM * * 

180 REM * 1986 BY FLORIAN MUELLER * 

190 REM * * 

200 REM ***************************** 

210 : 

220 PRINT CHR*(13> CHR*(13)"VERSCHIEBEN MITTELS 
BASIC" CHR*(7) CHR*(13) 

230 INPUT "SPEICHERBANK DES QUELLBEREICHS";BG 
240 INPUT "ANFANGSADRESSE D.QUELLBEREICHS";AQ*: 
AO=DECCAG*> 

250 : .PUT "ENDADRESSE{3SPACEJDES QUELLBEREICHS"; 
EQ*: EQ=DEC(EQS) 

260 INPUT "SPEICHERBANK DES{2SPACE>ZIELBEREICHS" 
;BZ 

270 INPUT "ANFANGSADRESSE D. ZIELBEREICHS";AZ*: 
AZ=DEC(AZ*> 

280 EZ=AZ+(EQ-AQ): REM ENDE DES ZIELBEREICHS BER 
ECHNEN 

290 PRINT "=> ENDADRESSE DES ZIELBEREICHS = *";H 
EX*(EZ) 

300 : 

310 IF AQ>AZ THEN 440: REM GEGEBENENFALLS ZWEITE 
SCHLEIFE ANSPRINGEN 

320 : 

330 Q=EQ: Z=EZ: REM Q = QUELLADRESSE; Z = ZIELAD 
RESSE 
340 : 

350 DO UNTIL Q<AQ 

360 : BANK BQ: QUELL=PEEK(Q): REM QUELLBEREICH A 
USLESEN 

370 : BANK BZ: POKE Z, QUELL: REM ZIELBEREICH BE 
SCHREIBEN 

380 : IF PEEK(Z)<>QUELL THEN PRINT RIGHT*(HEX*(B 
Q),1);HEX*(Q), 

390 : Q=Q—1: Z=Z-1: REM QUELL- UND ZIELADRESSE E 
RNIEDRIGEN 
400 LOOP 
410 : 

420 RUN 
430 : 

440 Q=AQ: Z=EQ: REM Q=QUELL-,Z=ZIELADRESSE 
450 : 

460 DO UNTIL Q>EQ 

470 : BANK BQ: QUELL=PEEK(Q): REM QUELLBEREICH A 
USLESEN 

480 : BANK BZ: POKE Z, QUELL: REM ZIELBEREICH BE 
SCHREIBEN 

490 : IF PEEK(Z> < >QUELL THEN PRINT RIGHT*(HEX*(B 
Q),1);HEX*(Q), 

500 : Q=Q+1: Z=Z+1: REM QUELL- UND ZIELADRESSE E 
RHOEHEN 
510 LOOP 
520 : 

530 RUN 

Listing 3. T-Befehl in Basic simulieren 


Befehl: 

Syntax: 

Wirkung: 
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absoluten Adressierungen Vorkommen; dies ist jedoch selbst 
bei Kleinstroutinen nur mit Mühe zu erreichen. 

Leider kennt der TEDMON des CI28 nicht die entspre¬ 
chenden Verschiebebefehle des SMON zum C64, der das 
Anpassen eines Maschinenprogramms an einen neuen Spei¬ 
cherbereich in professioneller Manier löst. 

Listing 3 ist ein Basic-Prag ramm - darum ist es so langsam 
- zur Simulation des T-Befehls mittels Basic. 

Sie können im Programm die Formel zur Berechnung der 
Endadresse des Zielbereichs gut erkennen. 

Die Länge von Listing 3 zeigt, daß die Verschiebefunktion 
nicht ganz so einfach zu programmieren ist. Vom Verhältnis 
Quellbereich/Zielbereich bezüglich der Lage im Speicher 
hängt nämlich die Form der Schleifenkonstruktion ab. 

Im übrigen kann es passieren, daß bei T-Befehlen wie »T 
00000 01000 FA000« der Monitor (beziehungsweise das 
Beispielprogramm) bestimmte Adressen ausgibt. Diese 
Adressen sind Adressen, die beim Verschieben Schwierig¬ 
keiten gemacht haben, weil der zu den Adressen gehörende 
Zielbereich nicht als RAM verwendbar ist. 

Die Adressen werden ausgegeben, wenn man versucht, 
ROM-Bereiche als Zielbereiche zu verwenden (im Beispiel »T 
00000 01000 FA000 wäre der Bereich ab $A000 in Bank 
$F (dezimal 15) als Zielbereich gewählt worden, obwohl es 
sich um einen ROM-Bereich handelt). Dieser Fehler wird 
dadurch gefunden, daß der Monitor beziehungsweise das 
Beispielprogramm nach jedem Byte prüft, ob der Zielbereich 
an der Stelle des gerade verschobenen Bytes auch mit dem 
Originalbereich übereinstimmt. Bei RAM-Bereichen, die man 
ja auch beschreiben und somit als Zielbereich einsetzen 
kann, tritt natürlich eine Übereinstimmung auf; bei ROM- 
Bereichen, die als Festwertspeicher nur les-, nicht aber ver¬ 
änderbar sind, führt ein solches Überprüfen (Verify) zu einem 
Fehler. Gleiches gilt, wenn man beim M-Befehl - oder mittels 
des Unterbefehls > - einen ROM-Bereich zu ändern ver¬ 
sucht. 

Bei Eingabefehlern erweist es sich als sehr nützlich, daß 
der Monitor die Adressen meldet; man muß aber bedenken, 
daß beim Transport in ROM-Bereiche aufgrund der 
Prozessor- und Speicherverwaltungsstruktur nicht das 
ROM, sondern das an gleicher Adresse liegende RAM 
beschrieben wird. So könnten Programme oder Programm¬ 
teile verlorengehen, ohne daß man es beabsichtigt hat. Wenn 
man aber anhand der ausgegebenen Adressen merkt, daß 
ein Fehler zustandekam, kann man noch schnell mit 
< RUN/STOP > abbrechen und somit den Schaden begren¬ 
zen. 

Noch etwas zum Verifizieren: 


Leider ist das Verifizieren - ob beim Monitor oder beim Simu¬ 
lationsprogramm - nicht lOOprozentig sicher: Wenn Sie den 
ROM-Bereich $4000 bis $A000 (in Bank 15) sich selbst 
kopieren lassen (erforderliches Monitor-Kommando: T 
F4000 FA000 F4000), könnte der Monitor den Fehler nie 
ausfindig machen; er würde immer den Bereich $4000 bis 
$A000 mit dem Bereich selbst vergleichen und logischer¬ 
weise keinen Fehler entdecken. Der Computer schreibt aber 
den ROM-Bereich dann nicht ins ROM selbst (das geht ja 
nicht), sondern ins darunterliegende RAM. Das heißt, effektiv 
würde der Bereich $F4000 bis $FA000 in den Bereich 
$04000 bis $0A000 kopiert. Prüfen Sie das doch einmal 
nach, indem Sie mittels M (den Vergleichsbefehl des Moni¬ 
tors haben wir noch nicht durchgenomen) den Bereich 
$4000 bis $A000 in Bank 0 mit dem entsprechenden 
Bereich in Bank 15 ($F) vergleichen, nachdem Sie über »T 
F4000 FA000 F4000« das Verschieben durchgeführt 
haben. 


Beim Kopieren mit »T F4000 FA000 F4001« würde der 
Monitor hingegen Fehler entdecken, da der Zielbereich 
($F4001 bis $FA001) nun ein anderer Speicherbereich wäre 
als der Originalbereich ($F4000 bis $FA000). 

Noch ein Hinweis, um Mißverständnissen vorzubeugen: 
Selbstverständlich kann man ROM-Bereiche ins RAM an 
anderer Stelle kopieren, nur nicht umgekehrt. So kann man 
den Bereich $F4000 bis $FA000 zwar nicht nach $F4001 
bis $FA001 kopieren, wohl aber nach $04001 bis $0A001 
verschieben: T F4001 FA001 04001. 

Der T-Befehl allein ist zunächst einmal nicht so recht ver¬ 
wertbar, vor allem erscheint einem der Nutzen des Komman¬ 
dos dann zweifelhaft, wenn man nicht Maschinenprogramme 
bearbeiten will. 

Wir möchten Ihnen zur Entschädigung ein Verfahren vor¬ 
stellen, um die Lage des Basic-Programms im Speicher zu 
ändern, also kurz gesagt: Das Verschieben des Basic- 
Programms in einen anderen Bereich. 

Bitte lösen Sie dazu einen Reset aus und laden dann ein 
Basic-Programm Ihrer Wahl in den Speicher. Es sollte der Ein¬ 
fachheit halber nicht allzulang sein. 

Wir verwenden als Beispielprogramm das Programm 
»CHANGE UNIT« von der Test/Demo-Diskette zur 
1570/1571 und laden es über DLOAD"CHANGE UNIT" 
< RETURN >. Das Programm soll nun nach $A000 (in Bank 
0) verschoben werden. 

Am besten arbeiten wir nun gemeinsam an diesem Bei¬ 
spielprogramm, das wohl jeder C 128-Besitzer mit einer der 
neuen Commodore-Floppy-Stationen zur Verfügung hat, das 
Verschieben dieses Programms durch. Daran können Sie 
natürlich auch lernen, wie man beliebige Programme ver¬ 
schiebt. Die einzelnen Schritte unseres Vorgehens numerie¬ 
ren wir mit römischen Zahlen. 

I Zustimmung von Anfangs- und Endadresse 

Geben Sie dazu folgenden Audruck ein (? ist die Abkürzung 
für PRINT): 

?HEX$(PEEK(45)+256*PEEK(46)),HEX$(PEEK(4624)+256*P- 
EEK(4625)) 

Sie erhalten die hexadezimale Darstellung von Anfangs¬ 
flinker Wert) und Endadresse (rechter Wert). Hexadezimale 
Darstellung deshalb, weil wir mit ihr an einigen Stellen besser 
zurechtkommen. 

Bei unserem Beispielprogramm CHANGE UNIT von der 
Test/Demo-Diskette erhalten wir den folgenden Ausdruck: 
1C01 20F5 

Es wird nicht erwähnt, daß es sich um Adressen in Bank 0 
handelt, da dies von Anfang an feststeht: Bank 0 ist die Spei¬ 
cherbank, in der das Basic-Programm abgelegt ist. 

Die Anfangsadresse ist in der Regel $1C01 (wie bei unse¬ 
rem Beispiel) oder $4001 bei Benutzung der Befehle zur 
hochauflösenden Grafik, die Endadresse - im Beispiel 
$20F5 - variiert natürlich (Programme sind ja auch unter¬ 
schiedlich lang). 

Diese Werte müssen wir uns natürlich merken, denn wenn 
wir das Basic-Programm verschieben wollen, müssen wir 
dem Monitor Anfangs- und Endadresse des Basic- 
Programms im Speicher mitteilen (unser Monitor ist schließ¬ 
lich kein Hellseher, wir haben ihn mit einer ausreichenden 
Anzahl von Informationen zu versorgen). 

II. Bestimmung der Endadresse des Zielbereichs 

Vielleicht stutzen Sie zunächst ein wenig, warum denn die 
Endadresse des Zielbereichs berechnet werden soll, wenn 
dies der Monitor ohnehin tut. 

Die Bestimmung ist auch nur erforderlich, damit wir die 
Endadresse in bestimmten Adressen, die der Basic- 
Interpreter benötigt, ablegen können. Die Endadresse des 
Zielbereichs ergibt sich über die Formel 
Endadresse Zielbereich = Endadresse - Anfangsadresse + 
Zieladresse. 
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Wir errechnen den hexadezimalen Wert über den Ausdruck 
?HEX$(DEC("hier Hex-Endadresse aus Schritt I 
einsetzen") - DEC( * hier Hex-Anfangsadresse aus Schritt I 
einsetzen") + DEC("hier Hex-Endadresse des Ziel¬ 
bereichs einsetzen ")) 

In unserem konkreten Fall »CHANGE UNIT nach $A000« 
heißt dies folgendermaßen: 

?HEX$(DEC( "20F5")-DEC( "1C01")+DEC( "A000")) 
und bringt folgendes Ergebnis auf den Bildschirm: 

A4F4 

Nun haben wir nach den Schritten I und II alle wichtigen 
Parameter errechnet: 

Anfangsadresse (Originalbereich) = $1C01 
Endadresse (Originalbereich) = $20F5 
Anfangsadresse (Zielbereich) = $A000 
Endadresse (Zielbereich) = $A4F4 

III. Zeiger des Interpreters setzen 

Nun müssen wir die Zeiger des Interpreters auf Anfangs- und 
Endadresse des Basic-Programms im Speicher an die Werte 
nach dem Verschieben (das Verschieben ist dann der näch¬ 
ste Schritt) anpassen. Außerdem ist ein Null-Byte als Markie¬ 
rung vor den neuen Basic-Start (das Programm soll nun bei 
$A000 liegen) anzubringen. 

Vorher noch etwas zur Wiederholung des Hexadezimal¬ 
systems: 

Das Low-Byte einer vierstelligen Hexadezimalzahl besteht 
aus den beiden am weitesten rechts stehenden Ziffern, die 
beiden am weitesten links stehenden Ziffern kennzeichnen 
das High-Byte. Beispiel: Zahl = $ABCD; LB (Abkürzung für 
Low-Byte) = $CD, HB (Abkürzung für High-Byte) = SAB. 

Da in Adressen (eine Speicherzelle kann nur ein Byte auf¬ 
nehmen) das Low-High-Format verwendet wird (eine 
Adresse - die der Adreßangabe nach niedrigere - enthält das 
Low-Byte, die andere - die der Adreßangabe nach höhere - 
enthält das High-Byte), sind in unserer nächsten Anwei¬ 
sungszeile folgende Rechnungen erforderlich: 

POKE 45, DEC(" LB der neuen Anfangsadresse "): POKE 
46, DEC(''HB der neuen Anfangsadresse"): POKE 
DEC(" neue Anfangsadresse" )-1, 0: POKE 4624, DEC(" LB 
der neuen Endadresse nach Schritt II"): POKE 4625, 
DEC(" HB der neuen Endadresse gemäß II" 

Bei unserem Beispiel lautet die Eingabe folgendermaßen 
POKE45, DEC( "00 "):P0KE46, DEC( "A0 "): POKE DEC ( "A000 ") - 
1,0: P0KE4624, DEC ("F4 "): P0KE4625, DEC ("A4 ") 

Nun weiß der Basic-Interpreter, in welchem Bereich das 
Basic-Programm liegt. 

IV. Verschieben des Programms 

Während wir bislang im Basic hantiert haben, kommt nun 
der Monitor zu seinem großen Auftritt. Wir verschieben das 
Basic-Programm an die Zieladresse. Dazu sind die in I. ermit¬ 
telten Parameter (Anfangs- und Endadresse des Originalbe¬ 
reichs) sehr nützlich. Vorher aber schalten wir den Monitor 
mittels <F8> oder Basic-Befehl MONITOR ein. 

Die Anweisung an den Monitor lautet: 

T Anfangsadresse Endadresse Zieladresse 

Im Beispiel »CHANGE UNIT nach $A000« heißt das also: 
T 1C01 20F5 AOOO 

Die Bank-Angabe lassen wir einfach weg, wir arbeiten ja in 
diesem Fall ohnehin nur in Bank 0 - und diese Bank ist vorein¬ 
gestellt. 

Nach dem Verschieben verlassen wir den Monitor wieder 
mit X. 

V. Basic-Programm an neuen Bereich anpassen 

Wenn Sie nun versuchen, das Programm zu LISTen, wer¬ 
den Sie merken, daß es an seinen neuen Speicherbereich 
noch nicht gänzlich angepaßt ist. Dies ist jedoch im Gegen¬ 
satz zum Anpassen von Maschinenprogrammen nicht weiter 
schwierig. Wir greifen dazu auf eine ROM-Routine zurück, 


die alle notwendigen Änderungen auf Wunsch durchführt: 
BANK15:SYS20303 

Diese Routine wird übrigens nach dem Laden eines Pro¬ 
gramms von der Kassette oder der Diskette immer vollauto¬ 
matisch ausgeführt. 

Jetzt haben wir es geschafft! In Zukunft werden Sie sich bei 
diesem Anwendungsfall viel leichter tun. Sie brauchen nur 
hier nachzuschlagen. Im übrigen geht es bei einem Basic- 
Programm, das Sie auf Diskette gespeichert haben, viel ein¬ 
facher. 

Der neue Beginn des aktuellen Basic-Programms im Spei¬ 
cher wird folgendermaßen festgesetzt: 

POKE 45, DEC("LB neuer Start"): POKE 46, DEC("HB 
neuer Start"): POKE DEC("Hex-Adresse für neuen 
Start ")-1, 0: NEW 

Jetzt laden Sie das Programm mit DLOAD "NAME". 

Natürlich kann das Programm auch auf einem anderen 
Speichermedium als der Diskette abgelegt sein. 

Das vorgestellte erste Verfahren (unter Verwendung des T- 
Befehls) ist hauptsächlich interessant, wenn das Programm 
nicht auf Diskette vorhanden ist. Dies kann zum Beispiel bei 
Zwischenversionen der Fall sein. 

Vor allem aber sollten Sie sehen, daß man den T-Befehl 
nicht nur für Maschinenprogramme, sondern auch für Basic 
nutzen kann; man muß nur wissen, wie das geht - dieser Kurs 
versucht, Ihnen alle nötigen Informationen zu vermitteln. 

Der Vergleichs-Befehl: C 


Im vorangegangenen Abschnitt wurde schon ein Vergleichs- 
Befehl erwähnt. In diesem Abschnitt sollen Sie alle nötigen 
Informationen zum Vergleichs-Befehl erhalten. 

Der V--. gleichs-Befehl lautet C (vom englischen Wort »com- 
pare«, deutsche Bedeutung »vergleichen«) und stimmt in der 
Syntax mit dem T-Befehl überein: 

C Anfangsadresse Endadresse Zieladresse 

Anfangsadresse und Endadresse markieren den ersten 
Bereich, Zieladresse ist die Anfangsadresse des zweiten 
Bereichs. Dann werden die verschiedenen Bereiche mitein¬ 
ander verglichen; unterschiedliche Adressen werden hexa¬ 
dezimal dargestellt. 

Natürlich ergibt sich auch hier mit Hilfe einer Gleichung die 
Endadresse des Zielbereichs: 

Endadresse des Zielbereichs = Endadresse - Anfangs¬ 
adresse + Zieladresse. 

Diese Gleichung werden Sie in Listing 4 - unserem Simuia- 
tionsprogramm zum Monitor-Kommando - in Zeile 280 wie¬ 
derfinden. 

In Bild 11 ist die Kurzübersicht zum C-Befehl - auch diese 
ist Ihnen sicher zur Gewohnheit geworden - dargestellt. 

Zur Berechnung der Endadresse des zweiten Bereichs ist 
noch etwas zu sagen: es ist nicht so, daß sie unbedingt vom 
Monitor berechnet wird. Er zählt einfach - wie das Beispiel¬ 
programm - regelmäßig die erste und die zweite Adresse um 
eins herauf. Die Vergleiche führt er mit der Adresse durch, 
deren Endwert ihm durch die Parameterübergabe bekannt ist 
(also der ersten Adresse). Beim C-Befehl wird also nur immer 
die Adresse des ersten Bereichs mit dem Endwert des ersten 
Bereichs verglichen. Eine zusätzliche Prüfung der Adresse 
des zweiten Bereichs erübrigt sich. 

Wenn Sie einen Bereich mit sich selbst vergleichen, wird 
natürlich keine unterschiedliche Adresse gemeldet (Beispiel: 
C F4000 F5000 F4000). 

Der C-Befehl ist vor allem für Maschinenprogrammierer 
interessant, die verschiedene Versionen ihrer Programme 
durch den C-Befehl miteinander vergleichen lassen und 
somit Unterschiede zwischen den einzelnen Versionen leicht 
entdecken. 


SONDERHEFT 10 


41 







GRUNDLAGEN 


C 128 


Bild 12 ist die Kurzübersicht zum F-Befehl. 

Auch die Anwendung des Fill-Befehls ergibt sich aus der 
jeweiligen Situation heraus. Der Fill-Befehl kann zum Beispiel 
verwendet werden, um eine ASCII-Tabelle zu löschen. Dazu 
überschreibt man sie mit Leerzeichen (Füll-Byte $20 = 
#32). 

So kann man den 40-Zeichen-Bildschirmspeicher mit fol¬ 
gender Eingabe löschen (vor der Eingabe bitte in die 
40-Zeichen-Darstellung gehen): 

F+1024+2023+32 

Mit folgendem Befehl wird er durch Sterne überschrieben: 
F+1024 + 2023 + 42 

Dieses Beispiel dient eigentlich mehr der Demonstration 
als der wirklichen Anwendung. Wenn Sie sich jetzt im 
40-Zeichen-Modus befinden und einen Befehl an den Moni¬ 
tor senden wollen, sollten Sie entweder die Eingabezeile hin¬ 
ter dem Monitor-Befehl über <ESC> und <Q> löschen 
oder einen Doppelpunkt»:« hinter den Befehl setzen. Schon 
beim Ändern des Memory-Dumps wurde erwähnt, daß dieser 
Doppelpunkt die Endmarkierung eines Monitor-Befehls ist - 
hier haben Sie eine denkbare Anwendung. 

Eine häufigere Anwendung ist aber das Löschen des 
Basic-Programm-RAMs in Bank 0. Am besten überschreibt 
man es dazu mit Null-Bytes: 

F 1C00 FDFF 00 

Mit »H1C00 FDFF 00« erhalten Sie dann alle Adressen von 
1C00 bis FDFF, da ja der gesamte Suchbereich nur aus Null- 
Bytes (dem ehemaligen Füll- und jetzigen Such-Byte) 
besteht. So wie man mit dem C-Befehl die Arbeit des T- 
Befehls prüfen kann, ist auch eine - sich eigentlich erübri¬ 
gende - Prüfung des F-Befehls mittels H möglich. Diese Prüf- 
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Die Befehlsabkürzung F kommt vom englischen Wort »fill« 
(deutsche Bedeutung »füllen«). 

Die Syntax: F Anfangsadresse Endadresse Füll-Byte 
Im Gegensatz zur Anfangs- und Endadresse darf das Füll- 
Byte (das Byte, mit dem der durch Anfangsadresse und End¬ 
adresse markierte Bereich aufgefüllt werden soll) nur einen 
Byte-Wert ($00 bis $FF = #0 bis #255 = %00000000 
bis %11111111) haben. 

Der Befehl bewirkt, daß alle Speicherzellen von Anfangs¬ 
adresse bis einschließlich Endadresse den Wert des Füll- 
Bytes annehmen. Am besten läßt sich dies an Listing 5, dem 
Simulationsprogramm zum F-Befehl, erkennen. 

Dieses Programm erkennt übrigens einen Fehler, wenn 
man einen ROM-Bereich füllen will, und steigt mit der Mel¬ 
dung »??? fehlerhafte Adresse« aus. Der Monitor-Befehl F tut 
dies nicht. Um das Beispielprogramm also kompatibel zu 
gestalten, ist die Zeile 320 einfach zu löschen. 

An der Kürze von Listing 5 kann man sehen, wie einfach 
und elementar zugleich der FBefehl ist. 


110 rem * * 

120- REM * SIMULATION DES MONITORBE- » 

130 REM * * 

140 REM * FEHLS 'F' MITTELS BASIC * 

150 REM * * 

170 REM * * 

180 REM * 19B6 BY FLORIAN MUELLER * 

190 REM * * 

200 REM ***************************** 

210 : 

220 PRINTCHRS(13)CHRS(13)"FUELLEN MITTELS BASIC 
"CHR*(7)CHR*(13) 

230 INPUT ”SPEICHERBANK DES FUELLBEREICHS";B 
240 INPUT "ANFANGSADRESSE D.FUELLBEREICHS“;A*:A 
=DEC(A*> 

250 INPUT "ENDADRESSE DES FUELLBEREICHS";ES:E 
=DEC(E*> 

260 INPUT "FUELLBYTE";F*:F=DEC(F*> 

270 5 

280 FA=ArREM FUELLADRESSE INITIALISIEREN 
290 s 

300 DO UNTIL FA>E 
310 :BANK BrPOKE FA,F 

320 :IF PEEK(FA)<>F THEN PRINT“??? ";RIGHT*(HEX 

*(B),1);HEX* <FA):EXIT 

330 :FA=FA+1 

340 LOOP 

350 : 

360 RUN 

Listing 5. FBefehl als Simulation in Basic 


Befehl: F 

Syntax: F Anfangsadresse Endadresse 

Füll-Byte 

Wirkung: füllt Speicherbereich von Anfangs¬ 

adresse bis Endadresse mit dem 
Füll-Byte auf. 

englisches Wort: Fill (füllen) 

Bild 12. Kurzübersicht zum Befehl F 


100 REM ***************************** 

110 REM * * 

120 REM * SIMULATION DES MONITORBE- * 

130 REM * * 

140 REM * FEHLS 'C' MITTELS BASIC * 

150 REM * * 

160 REM ***************************** 

170 REM * * 

180 REM * 1986 BY FLORIAN MUELLER * 

190 REM * * 

200 REM ***************************** 

210 s 

220 PRINTCHRSt13)CHR* (13)"VERGLEICHEN MITTELS B 
ASIC"CHR*(7)CHR*(13) 

230 INPUT "SPEICHERBANK DES 1. BEREICHS"jBl 
240 INPUT "ANFANGSADRESSE D.l. BEREICHS";Al*:Al 
=DEC<A1*> 

250 INPUT "ENDADRESSE DES 1. BEREICHS";El*:El 
=DEC(El*) 

260 INPUT "SPEICHERBANK DES 2. BEREICHS";B2 
270 INPUT "ANFANGSADRESSE D.2. BEREICHS"-; A2*: A2 
=DEC(A2*> 

280 E2=A2+(El—A1):REM ENDE DES ZIELBEREICHS BER 
ECHNEN 

290 PRINT"=> ENDADRESSE DES 2. BEREICHS = *";HE 
X*(E2) 

295 PRINT:PRINT"NICHT UEBEREINSTIMMENDE ADRESSE 
N:"CHR*(13) 

300 : 

310 T1=A1:T2=A2:REM ZU TESTENDE ADRESSEN BESTIM 
MEN (MIT ANFANGSWERTEN BEGINNEN) 

320 : 

330 DO UNTIL T1>E1 

340 :BANK Bl:W1=PEEK(TI):REM WERT AUS BEREICH 1 
AUSLESEN 

350 :BANK B2:W2=PEEK(T2):REM WERT AUS BEREICH 2 
AUSLESEN 

360 : IF W10W2 THEN PRINT RIGHTS (HEX* (Bl), 1); HE 
X*(TI),:REM KEINE UEBEREINSTIMMUNG, DANN ADRESS 
E AUSGEBEN 

370 :T1=T1+1:T2=T2+1:REM ADRESSEN ERHOEHEN 
380 LOOP 

390 : S46B C 

400 RUN 

Listing 4. Auch der C-Befehl kann in Basic simuliert werden 


Befehl: 

Syntax: 

Wirkung: 


englisches Wort: 


C Anfang 1 Endel Anfang2 
vergleicht den Bereich von Anfangl 
bis Endel mit dem Bereich ab 
Anfang2. 

Compare (vergleichen) 


Bild 11. Kurzübersicht zum Befehl C 


Der Füll-Befehl: F 
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verfahren unterscheiden sich jedoch in einem grundsätzli¬ 
chen Punkt: Während derT-Befehl nur korrekt gearbeitet hat, 
wenn der C-Befehl mit gleichen Parametern keine Adresse 
auf den Bildschirm bringt, ist die Arbeit des F-Befehls nur in 
Ordnung, wenn ein H-Befehl mit gleichen Parametern alle 
Adressen im Suchbereich ausgibt. 

Im übrigen dient das Prüfen der Monitor-Befehle nicht dem 
Test der ohnehin korrekten Monitor-Routinen, sondern viel¬ 
mehr der Suche nach Änderungen, die man nach bestimmten 
Befehlen durchgeführt hat. 

Ein wichtiger Hinweis zum Beispiel »F 1C00 FDFF 00«: Im 
Gegensatz zum NEW-Befehl oder Reset ist nach dieser Ein¬ 
gabe ein Retten des Basic-Programms durch ein OLD- 
Programm (64’er, Ausgabe 12/85, Seite 43) nicht möglich, 
da der Speicher wirklich gelöscht wird. Beim NEW-Befehl 
oder Reset hingegen bleibt der Großteil des Speichers erhal¬ 
ten, da nur 3 Byte gelöscht werden. 

Noch eine Anwendung, die sicher auch auftritt, wenn Sie 
den C64-Modus ab und zu nutzen: 

Wenn ein G064 zum Absturz führt, da der C64-Modus 
gegen Reset geschützt ist, kann man 

a) die Radikalkur anwenden, indem man den gesamten Spei¬ 
cher in Bank 0 wie beschrieben löscht und dann G064 
eingibt oder 

b) mit »F 8004 8008« die Markierung löschen, die für den 
Reset-Schutz verantwortlich ist, und dann »G064« ein¬ 
geben. 

Das Verfahren b) ist natürlich schneller (es müssen nur 
wenige Bytes überschrieben werden). Das Verfahren a) ist 
oft aber empfehlenswert, wenn sichergestellt werden soll, 
daß sich nicht noch ein altes Programm im Speicher befindet. 

Der Disketten-Operationsbefehl: @ 


Der Befehlsbuchstabe für Diskettenoperationen ist der Klam¬ 
meraffe. Der Klammeraffe ist das Zeichen, das Sie auf der 
amerikanischen Tastatur rechts vom P finden. Es handelt sich 
um ein A in einer Art Kreis, der es umklammert. 

Die Umsteiger vom C 64 auf den C128 kennen den Klam¬ 
meraffen als Disketten-Operationsbefehl schon vom DOS 
5.1. Seine Syntax ist in einigen Punkten auch beim TEDMON 
vorhanden. 

Die Syntax des @-Befehls ist etwas schwierig zu beschrei¬ 
ben, da auf diesen Befehl mehrere Funktionen fallen. 

Der Befehl kann nur aus dem »Klammeraffen« bestehen, 
dann wird der Status von Laufwerk 8 angezeigt. Um Gerät 9 
anzuwählen, gibt es die Möglichkeit, direkt nach dem Klam¬ 
meraffen die Gerätenummer anzugeben: »@9« ist der glei¬ 
che Befehl, spricht aber Laufwerk 9 an. 

Wenn Sie nach dem Befehl und der eventuellen Angabe 
der Gerätenummer, die selbstverständlich entfallen kann, ein 
Komma »,« setzen und darauf ein Disk-Befehl folgt, wird die¬ 
ser ausgeführt. 

Beispiel: »@,l« initialisiert Laufwerk 8 (da zwischen dem 
Klammeraffen und dem Komma keine Zahl steht), »@9,l« ist 
das gleiche für Laufwerk 9. 

Übrigens: Weder der Monitor-Befehl noch einzelne Para¬ 
meter nach dem Klammeraffen werden in Anführungszei¬ 
chen gesetzt! 

Beginnt der gegebene Befehl nach dem Klammeraffen mit 
dem Dollarzeichen »$«, so handelt es sich natürlich nicht um 
einen Disk-Befehl. TEDMON interpretiert dies als Directory- 
Befehl: »@8,$« listet das Directory von Laufwerk 8. Dem »$« 
können auch weitere Zeichen folgen, so daß ein Selektieren 
bei der Ausgabe des Directories kein Problem ist: 

»@,$: * =PRG« gibt nur die Programm(PRG)-Files aus. 

Der Klammeraffen-Befehl ist sehr nützlich für den Disket¬ 
tenanwender. Eine Kurzübersicht finden Sie in Bild 13. 


Befehl: 

Syntax: 

oder 

oder 

Wirkung: 


englisches Wort: 


<@> 

< @ > (Gerätenummer) 

< @ > (Gerätenummer), Befehl 

< @ > (Gerätenummer), $(Optionen) 
Anzeigen des Disk-Status, wenn 
kein Komma auf Klammeraffe und 
evtl. Gerätenummer folgt. 

Senden eines Befehls an die Floppy, 
wenn Befehl folgt. 

Anzeige des Directory unter Berück¬ 
sichtigung der Optionen, falls Disk- 
Befehl mit " $ " beginnt. 


Bild 13. Kurzübersicht zum Befehl @ 


Oft interessiert man sich nur für einen Teil des gesamten 
Directories. Das Floppylaufwerk ist in der Lage, einzelne Teile 
des Directories an den Computer zu senden, wenn es ihr nur 
mitgeteilt wird. Das »$« hinter dem Klammeraffen sendet der 
Monitor als Filename zum Floppylaufwerk. Dann arbeitet er wie 
der Basic-Befehl CATALOG, beziehungsweise DIRECTORY. 

Bei diesen Befehlen lassen sich auch Selektierungen vor¬ 
nehmen, wenn dem Befehl ein entsprechender Filename, der 
natürlich mit »$« beginnen muß, folgt: 

DIRECTORY "$:*=PRG" in Basic entspricht dem 
Monitor-Kommando: @,$:* = PRG. 

Nun zum Aufbau des Directory-Ausschnitt-Filenamens. 
Auf das »$« sollte ein Doppelpunkt»:«folgen. Danach wie¬ 
derum kann ein Filename stehen. In diesem Filenamen dürfen 
dann Joker Vorkommen (siehe Floppy-Handbuch). 

»$:FILENAME« ist also die Anweisung, um den Directory- 
Eintrag des Programms FILENAME mitsamt Kopfzeile und 
»BLOCKS FREE«-Angabe auf den Bildschirm zu holen. 
»$:FILE*« listet alle Files, deren Namen mit »FILE« beginnen. 
»$:F??E« listet alle Files, deren erster Buchstabe im Filena¬ 
men F und deren vierter Buchstabe ein E ist. Damit erst gar 
nicht Mißverständnisse aufkommen: 

$ ist kein Befehl an das Diskettenlaufwerk, den man über 
OPEN und PRINT # sendet und auch kein Monitor- oder 
Basic-Befehl. »$:FILENAME« allein ergibt nur einen Syntax 
Error oder das Monitor-Fragezeichen. Erst CATALOG "$: 
FILENAME" ist ein gültiger Basic- und @,$:FILENAME ein 
gültiger Monitor-Befehl. 

Nun wieder zu den Anwendungen des Jokers: 

Auch die Kombination ist möglich. »$:F?L*«listet alle Files, 
die folgende Bedingungen erfüllen: 

1. Das erste Zeichen im Filenamen ist ein F 

2. Das dritte Zeichen im Filenamen ist ein L 

3. Der Filename besteht aus mindestens drei Zeichen. 
Folgt nun der Angabe des Filenamens noch ein »=« und 

darauf der Filetyp, kann man auch nur bestimmte Files zulas¬ 
sen: 

@,$:F?L* =SEQ 

listet alle Files, die die oben genannten drei Bedingungen 
erfüllen und noch eine vierte: 

4. Das File muß ein SEQ-File (sequentielles File) sein. 

Nun verstehen wir auch, warum »@,$:*=PRG« alle Pro¬ 
grammfiles auflistet, denn aus dem Filenamen »$:*=PRG« 
ergeben sich folgende Bedingungen: 

1. Der Filename muß mindestens aus einem Zeichen beste¬ 
hen. Diese Bedingung erfüllt jedes File, also können wir 
sie weglassen. 

2. Es muß sich um ein Programm-File handeln. 

Letztendlich muß also nur die zweite Bedingung (Pro¬ 
gramm-File) erfüllt sein. 

Wir haben uns jetzt etwas ausführlich mit den Anwen¬ 
dungsmöglichkeiten der Directory-Ausgabe auseinanderge¬ 
setzt, aber es hat sich gelohnt: Sie können sich diese Kennt- 
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nisse auch für die Basic-Befehle CATALOG und DIRECTORY 
zunutze machen! 

Der Speicher-Befehl: S 


Nachdem wir uns im letzten Abschnitt mit der Diskettenver¬ 
waltung befaßt haben, sollen uns nun die Ein-/Ausgabe- 
möglichkeiten mit dem Monitor eine Weile beschäftigen, 
denn wenn man ein Programm erstellt, geändert oder gete¬ 
stet hat (für alle diese Anwendungen nimmt man ja den Moni¬ 
tor her), will man es meist auch speichern. 

Der Befehl zum Speichern heißt S und ist die Abkürzung 
des englischen Wortes »to save«, das mit »speichern« zu 
übersetzen ist. 

Die Syntax ist folgende: 

S "FILENAME", Gerät, Anfangsadresse, Endadresse+1 

Der Filename darf maximal 16 Zeichen lang sein (wie bei 
den Basic-Befehlen DSAVE und BSAVE zum Speichern). Die 
Geräteadresse wird als Byte-Wert (zum Beispiel »08« für Dis¬ 
kettenlaufwerk) angegeben. Anfangs- und Endadresse 
geben den Bereich an, der gespeichert werden soll. Dabei ist 
jedoch zu beachten, daß die Endadresse nicht mitgespei¬ 
chert wird. Daher heißt es in der Kurzübersicht (Bild 14) auch 
»Endadresse+1«. 

Wenn man also die Endadresse um eins erhöht, ist es mög¬ 
lich, den gesamten Bereich (auch das letzte Byte) zu spei¬ 
chern. Leider kann man dem Monitor nicht die Endadresse in 
Form von »S1F05+1« mitteilen, sondern muß die Addition 
selbst durchführen. Die Endadresse Ihres Programms dürfte 
Ihnen in der Regel bekannt sein, so daß die Addition nicht wei¬ 
ter schwerfallen sollte. 

Nun aber wieder zum S-Befehi. 

Der Befehl speichert den angegebenen Speicherbereich 
(die Speicherbank wird in den Adressen angegeben) auf Dis¬ 
kette ab. Hierfür gibt es aber doch schon den Basic-Befehl 
BSAVE, oder? 

Das ist richtig. Der BSAVE-Befehl entspricht in der Wirkung 
dem S-Befehl des Monitors. Andererseits ist es aber gut, daß 
auch der Monitor einen Speicher-Befehl zur Verfügung hat, 
denn oft wurde der Speicher des Computers beim Arbeiten 
mit dem Monitor so verändert, daß ein X-Befehl zum erneuten 
BREAK (also Neustart des Monitors) oder gar zum Ausstieg, 
aber nicht zum Sprung ins Basic führt. In einem solchen Fall 
besteht die einzige Hoffnung im Monitor selbst, und Sie kön¬ 
nen das fehlerhafte oder fehlerhaft unterbrochene Programm 
wenigstens noch SAVEn. 

Im übrigen kann der S-Befehl - wie alle anderen I/O- 
Befehle des Monitors auch (I/O-Befehle sind Befehle wie 
Klammeraffe oder S, die sich auf Eingabe/Ausgabe = 
Input/Output = I/O beziehen), zu einer Fehlermeldung füh¬ 
ren, die das Betriebssystem erzeugt. Diese Meldung heißt 
»I/O ERROR #X«, wobei X eine Nummer ist, die über den 
Fehler Auskunft gibt. Ein gängiger Fehler ist »I/O ERROR 
# 5«, was der Bedeutung der Basic-Fehlermeldung »DEVICE 
NOT PRESENT« entspricht. 

In Bild 15 finden Sie die Bedeutung der einzelnen 1/0- 
ERROR-Meldungen, die übrigens auch beim Klammeraffen- 
Befehl Vorkommen können. 

Es gibt noch einen weiteren Basic-Befehl zum Speichern, 
nämlich SAVE beziehungsweise DSAVE. Dieser speichert - 
wie BSAVE oder der Monitor-Befehl S - auch nur einen 
Bereich ab und zwar den, in dem das Basic-Programm abge¬ 
legt ist. Diesen Bereich muß er natürlich ausfindig machen, 
denn die Speicherroutine des Betriebssystems benötigt 
Anfangs- und Endadresse+1 eines Speicherbereichs. 

Genau diese Informationen holt sich der Interpreter dann 
aus den Adressen $2D/$2E (Zeiger auf Anfangsadresse des 
Basic-Programms im Speicher) und $1210/$1211 (Zeiger 


Befehl: S 

Syntax: S "NAME".Gerät,Anfangsadresse 

Endadresse 

Wirkung: speichert File unter NAME auf das 

angegebene Gerät von Anfangs¬ 
adresse bis Endadresse, 
englisches Wort: Save (retten = > speichern) 

Bild 14. Kurzübersicht zum Befehl S 


Fehlernummer 

entsprechende Meldung in Basic 

0 

BREAK 

1 

TOO MANY FILES 

2 

FILE OPEN 

3 

FILE NOT OPEN 

4 

FILE NOT FOUND 

5 

DEVICE NOT PRESENT 

6 

NOT INPUT FILE 

7 

NOT OUTPUT FILE 

8 

MISSING FILE NAME 

9 

ILLEGAL DEVICE NUMBER 


Bild 15. Übersicht über die I/O-Fehlermeldungen 


auf Endadresse+1 des Basic-Programms im Speicher). Da 
wir das Auslesen dieser Zeiger mittels Monitor oder Basic 
schon im Abschnitt über den M-Befehi besprochen haben, 
wäre es theoretisch möglich, daß Sie die Zeiger auslesen und 
mit dem Monitor bearbeitete Basic-Programme dann über 
BSAVE oder S speichern. Dies ist aber eigentlich nur dann 
ratsam, wenn Sie aus dem Monitor heraus nicht mit X ins 
Basic zurückkehren können (zum Beispiel wegen Fehlein- 
gafcc ). Wann immer es geht, ist es viel einfacher, mit X ins 
Basic zu springen und das Basic-Programm - sofern es auch 
über LOAD beziehungsweise DLOAD geladen wurde - mit¬ 
tels SAVE beziehungsweise DSAVE zu speichern. 

Ob es sich bei dem auf diese Weise gespeicherten Pro¬ 
gramm um ein Basic-Programm handelt, ist nicht von Inter¬ 
esse. Bedingung ist nur, daß das Programm 

- über die Basic-Befehle DLOAD "NAME" oder LOAD- 
" NAME ".Gerät (nicht LOAD "NAME",Gerät,1) geladen 
wurde und 

- die Zeiger $2D/$2E beziehungsweise $1210/$1211 auf 
Anfangs- beziehungsweise Endadresse des Basic-Pro¬ 
gramms zeigen (also diese Zeiger nicht manipuliert wur¬ 
den). 

Den Monitor-Befehl S setzt man in der Regel zum Spei¬ 
chern einzelner Bereiche (zum Beispiel Maschinenroutinen) 
ein. 

Der Lade-Befehl: L 


So wie S der Befehl zum Speichern ist, gibt es L als Befehl 
für »to load« (laden) zum Laden von Programmen. 

Der L-Befehl hat zunächst einmal folgende Syntax: 

L "FILENAME".Gerät,Ladeadresse 
Das Beispiel »L "BEISPIEL",08,10000« lädt das Pro¬ 
gramm »BEISPIEL« (Filename wie bei S maximal 16 Zeichen) 
von Gerät 8 (Diskettenlaufwerk) in Bank 1 ab Adresse 
$ 0000 . 

So wie der Monitor-Befehl S auch durch den Basic-Befehl 
BSAVE ersetzt werden kann, können wir dieses Beispiel fol¬ 
gendermaßen mittels BLOAD in Basic formulieren: 

BLOAD"BEISPIEL",DO,U8,0N B1,P(DEC("C000")) 

Der einzige Vorteil des Monitor-Befehls L gegenüber dem 
BLOAD-Befehl, beziehungsweise des BSAVE-Befehls 
gegenüber dem Monitor-Befehl S ist, daß bei den Monitor- 
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Befehlen die Geräteadresse frei wählbar ist (also auch Data- 
sette möglich ist), während die Basic-Befehle BLOAD und 
BSAVE nur auf den lEC-Bus zugreifen (effektiv kann man also 
nur das Diskettenlaufwerk verwenden). Ob diese zusätzliche 
Möglichkeit der Monitor-Befehle tatsächlich ein Vorteil ist, 
muß dahingestellt bleiben, denn die Datasette ist wirklich 
kein angemessenes Speichergerät für den CI28. 

Der Befehl L kennt noch zwei weitere Formen der Syntax, 
denn man kann Ladeadresse oder Ladeadresse und Geräte¬ 
nummer entfallen lassen. Dann werden sogenannte Default- 
Werte eingesetzt. Default-Werte sind Werte, die bei der Über¬ 
gabe von Parametern dann eingesetzt werden, wenn kein 
Wert geliefert wird. 

»L "BEISPIEL",08« lädt das Programm »BEISPIEL« von 
Gerät 8 (Diskettenlaufwerk) an die Anfangsadresse, die im 
Programm-File vermerkt ist. Mit dieser Anfangsadresse wer¬ 
den wir uns noch näher befassen, denn diese ist genauso 
wichtig für ein File wie Blockzahl, Programmlänge oder File¬ 
typ, wird aber leider nicht im Directory angezeigt. Nur soviel 
sei zunächst gesagt: In PRG-Files wird auch die Anfangs¬ 
adresse beim Speichern des Files mitgespeichert. Falls wir 
diese beim Monitor-Befehl L oder beim Basic-Befehl BLOAD 
weglassen, wird die im Programm vermerkte Anfangs¬ 
adresse als Ladeadresse verwendet. 

Gleiches geschieht beim Basic-Befehl LOAD "BEI¬ 
SPIEL",8,1. Diesen wollen wir jedoch übergehen, denn 
zum Laden von Maschinenprogrammen/Speicherbereichen 
sollte man auf diese Variante verzichten und lieber auf BLOAD 
beziehungsweise den Monitor-Befehl L zugreifen. 

Die letzte Syntax-Variante von L ist 
L "BEISPIEL" 

In diesem Fall wird das File von Datasette geladen und zwar 
an die im Programm vermerkte Anfangsadresse, da der C128 
als Default-Gerät die Datasette gespeichert hat. 

Die gesamte Syntax von L finden Sie noch einmal in Bild 16 
als Kurzübersicht zusammengefaßt. 

Für Programme, die ohnehin Basic-Programme sind oder 
zumindest eine Basic-Zeile haben und am Basic-Start begin¬ 
nen, ist der Basic-Befehl LOAD beziehungsweise DLOAD ein¬ 
deutig vorzuziehen. Dieser bietet nämlich den Vorteil, daß 
das Programm hinterher nicht mit dem Monitor oder über 
BLOAD gespeichert werden muß - wo man ja Anfangs- und 
Endadresse selbst bestimmen muß -, sondern daß man das 


Befehl: 

Syntax: 

Wirkung: 

englisches Wort: 

L 

L "NAME"(.Gerätenummer) 
(.Ladeadresse) 

lädt File "NAME" vom angegebe¬ 
nen Gerät (falls weggelassen: 

# 1 = Datasette) an die Adresse, ab 
der es gespeichert wurde, oder - 
falls angegeben - an die 
gewünschte Ladeadresse. 

Load (laden) 

Bild 16. Kurzübersicht zum Befehl L 

Befehl: 

V 

Syntax: 

V "NAME"(.Gerätenummer) 


(.Ladeadresse) 

Wirkung: 

vergleicht aktuellen Speicher - falls 


angegeben: von der Ladeadresse an 


- mit dem File "NAME" auf dem 


angegebenen Gerät (falls weg- 


gelassen: 1). 

englisches Wort: 

Verify (überprüfen) 


Bild 17. Kurzübersicht zum Befehl V 


Programm später über SAVE beziehungsweise DSAVE (siehe 
letzten Abschnitt) speichern kann. 

Fassen wir noch einmal kurz zusammen: Der BLOAD- 
beziehungsweise Monitor-L-Befehl ist nur beim Laden von 
Maschinenprogrammen angebracht. In der Wirkungsweise 
besteht kein Unterschied, der L-Befehl des Monitors erlaubt 
jedoch auch das Laden von Datasette. Der LOAD- bezie¬ 
hungsweise DLOAD-Befehl in Basic ist zur Bearbeitung von 
Basic-Programmen oder solchen, die in einigen Punkten wie 
Basic-Programme zu handhaben sind, besser geeignet. 

Im nun folgenden restlichen Teil dieses Abschnitts wollen 
wir uns noch mit den Unterschieden zwischen dem Laden an 
eine angegebene Ladeadresse und dem Laden an die im Pro¬ 
gramm enthaltene Anfangsadresse befassen. Insbesondere 
werden wir noch die dafür verwendeten Fachbegriffe ken¬ 
nenlernen. 

Absolutes Inden 


Absolut laden heißt, daß ein Programm an die Adresse gela¬ 
den wird, die beim Speichern als Anfangsadresse verwendet 
wurde. 

Beim Weglassen der Ladeadresse beim Basic-Befehl 
BLOAD beziehungsweise beim Monitor-Kommando L wird 
absolut geladen: Das Betriebssystem holt sich zuerst die 
Anfangsadresse, dann wird an diese geladen. Das absolute 
Laden ist vor allem bei Maschinenprogrammen angebracht. 

Relatives Laden 


Relativ laden heißt, daß ein Programm an eine vorgegebene 
Adrap».- geladen wird, und zwar unabhängig von der 
Adresse, ab der es gespeichert wurde. 

Bei Angabe der Ladeadresse beim Basic-Befehl BLOAD 
beziehungsweise beim Monitor-Komando L wird relativ gela¬ 
den: Das Betriebssystem lädt das Programm an die angege¬ 
bene Anfangsadresse. 

Da Basic-Programme ziemlich unabhängig vom Speicher¬ 
bereich sind, in dem sie sich gerade befinden (Beweis ist die 
Möglichkeit des Verschiebens der Basic-Programme im 
Abschnitt über den T-Befehl, beziehungsweise beim Ein¬ 
schalten der hochauflösenden Graphik, wo das aktuelle 
Basic-Programm nach $4001 verschoben wird), ist der 
Basic-Befehl LOAD beziehungsweise DLOAD darauf einge¬ 
richtet, das Programm an eine Ladeadresse zu laden. Sie 
werden sich vielleicht fragen, woher diese Ladeadresse 
kommt, wenn man doch bei LOAD "BEISPIEL",8 oder 
DLOAD" BEISPIEL" keine Ladeadresse angibt. Die Frage ist 
berechtigt, aber um die Ladeadresse müssen wir uns keine 
Sorgen machen. Diese Arbeit nimmt uns der Interpreter ab, 
der beim Laden über DLOAD (beziehungsweise LOAD ohne 
Angabe der Sekundäradresse) die Adresse als Ladeadresse 
einsetzt, die im Zeiger $2D/$2E als Anfangsadresse des 
aktuellen Basic-Programms im Speicher abgelegt ist. 

Da Maschinenprogramme meist nur in einem Bereich lauf¬ 
fähig sind, kommt für Sie relatives Laden selten in Betracht. 

Der Überprüf-Befehl: V 


Zum »Triumvirat« der I/O-Befehle LOAD, SAVE und VERIFY 
fehlt uns nur noch letzterer. Dieser Befehl heißt beim TED- 
MON, wie nicht anders zu erwarten war, V als Abkürzung für 
»to verify« (englisches Wort für »nachprüfen«). 

Die Syntax ist die des L-Befehls (die Routine des Betriebs¬ 
systems für L beziehungsweise V ist sogar ein und dieselbe) 
und kann noch einmal der Kurzübersicht (Bild 17) entnom- 
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men werden. Der Unterschied in der Funktionsweise ist der, 
daß das Programm nicht in den Speicher geladen (wie es bei 

L der Fall wäre), sondern mit den entsprechenden Speicher¬ 
inhalten verglichen wird. 

Falls keine Übereinstimmung besteht, erscheint die Mel¬ 
dung »VERIFYING ERROR», ansonsten nur »VERIFYING«. 

Da mit den aktuellen Speicherinhalten Vergleiche durchge¬ 
führt werden, ist es sogar möglich, relativ, beziehungsweise 
absolut, zu vergleichen. 

Der V-Befehl ist eigentlich nur deshalb interessant, weil es 
keinen BVERIFY-Befehl im Basic gibt. Um nur die Lauffähig¬ 
keit der Floppy 1571 zu testen, ist der V-Befehl überflüssig, 
denn die Floppy 1571 führt selbständig ein Verify durch 
(dabei wird allerdings nicht mit dem Speicher, sondern mit 
dem Puffer der Floppy-Station verglichen). 

Nun haben wir alle I/O-Befehle des Monitors (@, L, S, V) 
besprochen. Der folgende Abschnitt wird sich intensiv mit 
dem Thema Ein-/Ausgabe (I/O) befassen. 

Zusätzliche Erklärungen zur 
Ein-/Ausgabe mit TEDMON 

Die absolute Anfangsadresse eines Programms ist die 
Adresse, ab der das Programm gespeichert wurde. Beim 
absoluten Laden ist diese Adresse der Ersatz der Lade¬ 
adresse beim Relativladen. 

Bei einem Diskettenfile enthalten die beiden ersten Bytes 
die absolute Anfangsadresse: 

Erstes Byte des Files: LB der absoluten Anfangsadresse 
Zweites Byte des Files: HB der absoluten Anfangsadresse 

Auf der 1571-Test/Demo-Diskette befindet sich übrigens 
ein interessantes Programm zum Auslesen und Manipulieren 
der Anfangsadresse. Es trägt den Filenamen »LOAD 
ADDRESS«, übersetzt also »Ladeadresse«. 

Bei vielen Maschinenprogrammen ist die absolute Anfangs¬ 
adresse gleich der Startadresse. Das heißt, wenn Sie ein Pro- 

100 REM ******************************* 

670 D0:GET#1,BS:L00P WHILE B*<>CHRS(34) 

110 REM * * 

680 DO:GET#1,BS:LOOP WHILE BS=CHRS(32> 

120 REM * ANFANGSADRESSE * 

690 DO:GETttl,BS:LOOP WHILE B*<>"" 

130 REM * * 

700 GET#1,A*,BS,AS,BS 

140 REM * UND ENDADRESSE * 

710 IFAS=""THENAS=CHRS(0) 

150 REM * * 

720 IFBS=""THENBS=CHRS(0) 

160 REM * EINES DISKETTENPROGRAMMS * 

730 B=ASC(AS)+256*ASC(BS> 

170 REM * * 

740 PRINT USING WS;B;:PRINT“ = S";HEXS(B) 

ISO REM * ERMITTELN. * 

750 CLOSEI 

IVO REM * * 

760 : 

200 REM ******************************* 

770 REM *********************** 

210 REM * * 

780 REM * MAXIMALE ENDADRESSE * 

220 REM * 1985/86 BY FLORIAN MUELLER * 

790 REM *********************** 

230 REM » * 

800 : 

240 REM ******************************* 

810 PRINT:PRINT"MAXIMALE ENDADRESSE:", 

250 : 

820 E=A+254»B-2 

260 IFPEEK(215)<>128THEN PRINT"NUR IM BO-ZEICHE 

830 PRINT USING WS;E;:PRINT" = *";HEXS(E> 

N-MODUS LAUFFAEHIG":STOP 

270 FAST:SCNCLR:WS="#####“ 

8™ CLOSEI :CL0SE15 

bL-S PRINT: PRINTCHRS (15) "TASTE DRUECKEN (G FUER 

280 PRINTCHRS(27)"0":PRINT"BESTIMMUNG VON ANFAN 

GENAUE ENDADRESSE/D FUER DRUCKERAUSGABE DER DAT 

GS- UND ENDADRESSE"OHRS(13) 

EN) "; 

290 INPUT"FILENAME";NS:IF NS="S" THEN PRINT:DIR 

860 GETKEY GKS:IF GKS="D"THENEE=E:M=1:GOTO1070: 

ECTORY:PRINT:GOTO 280 

ELSE IF GKSO“G"THEN RUN 

300 0PEN15,8,15,"I0" 

870 : 

310 IF DSO0THEN340 

880 REM ********************* 

320 0PEN1,8,3,NS+",P,R" 

890 REM * GENAUE ENDADRESSE * 

330 IFDS=0THEN410 

900 REM ********************* 

340 PRINTrPRINTCHRS(15)"DISKFEHLER: ";DS*:PRINT 

910 : 

350 CLOSE1: CLOSE15: G0T0290 

920 M=0 

360 : 

930 PRINTCHRS(27)"D":PRINTCHRS(145 >"GENAUE ENDA 

370 REM ************************** 

DRESSE FUER 'S':", 

330 REM * INFORMATIONEN AUSGEBEN * 

940 EE=A:OPEN 1,8,0,NS 

390 REM ************************** 

950 DO UNTIL ST AND 64 

400 : 

960 :GET#1,AS:EE=EE+1 

410 SCNCLR:PRINT:PRINT"INFORMATIONEN FUER "CHRS 

970 LOOP:EE=EE—1 

(34);NS;CHRS(34) 

980 PRINTUSING WS;EE;:PRINT" = S";HEXS(EE) 

420 PRINT 

990 CLOSEI 

430 : 

1000 PRINT:PRINTCHRS(15)"TASTE DRUECKEN (D FUER 

440 REM ****************** 

DRUCKERAUSGABE DER DATEN)“; 

450 REM * ANFANGSADRESSE * 

1010 GETKEY GKS:IF GKS<>"D"THEN RUN 

460 REM ****************** 

1020 : 

470 : 

1030 REM ****************** 

480 PRINT:PRINT"ANFANGSADRESSE:",, 

1040 REM * DRUCKERAUSGABE * 

490 GET#1,AS:GET#1,BS 

1050 REM ****************** 

500 IFAS=""THENAS=CHRS(0) 

1060 : 

510 IFBS=""THENBS=CHRS(0) 

1070 VS="##############################":REM 30 

520 A=ASC(AS)+256*ASC(B4> 

* # 

530 PRINT USING WS;A;:PRINT" = S";HEXS(A) 

1080 PRINTCHRS(27)"D" 

540 CLOSEI 

1090 OPEN 4,4 

550 : 

1100 PRINT44,USING VS;"FILENAME:";:PRINT#4,NS 

560 REM ********************** 

1110 PRINT#4,USING VS;"ANFANGSADRESSE:";:PRINT# 

570 REM * ANZAHL DER BLOECKE * 

4,USING WS;A;:PRINT#4,“ = S";HEXS(A) 

580 REM ********************** 

1120 PRINT#4,USING VS;"ENDADRESSE:";:PRINT#4,US 

590 : 

ING WS;E;:PRINT#4," = S";HEXS(EE);:IF M=1 THEN 

600 PRINT:PRINT"ANZAHL DER BLOECKE AUF DISK:", 

PRINT#4," (MAXIMAL)":ELSE PRINT#4," (FUER 'S'-B 

610 0PEN1,8,0,"S:"+NS 

EFEHL)” 

620 GET#1,AS,BS 

1130 PRINT#4,USING VS;"LAENGE IN DISK-BLOECKEN: 

630 GET#1,A*,BS 

";:PRINT#4,USING WS;B;:PRINT#4,“ = S";HEXS(B> 

640 GET#1,AS,BS 

1140 CL0SE4 

650 GET#1,BS: IFSTO0THEN840 

660 IFBS< >CHR*(34)THEN650 

1150 IF M=1 THEN 850:ELSE GOTO 1000 

Listing 6. Ermitteln von Anfangs- und Endadresse eines Diskettenprogramms 
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gramm an die Adresse 49152 laden, wird es unter Umstän¬ 
den auch mit SYS 49152 gestartet. Hierfür kann jedoch kei¬ 
nerlei Garantie übernommen werden. 

Der Unterschied zwischen Anfangs- und Startadresse ist 
folgender: Die Anfangsadresse beschreibt nur die »geo¬ 
graphische« Lage im Speicher, sagt aber nichts über den 
Start des Programms aus. Die Startadresse hingegen gibt 
keine Auskunft darüber, wo das Programm im Speicher 
beginnt, sagt uns aber, wo man das Programm startet. In der 
Literatur werden diese Begriffe oft durcheinandergewürfelt. 

Ermittlung von Anfangs- und Endadresse 


Für die Anwendung der Befehle L, S und V ist es sehr wichtig 
zu wissen, wo im Speicher das Programm liegt, das man bear¬ 
beiten möchte. Dazu hilft uns ein Programm, das zwar das 
längste, aber sicher auch nützlichste Listing dieses Kurses 
ist: Listing 6. Dieses Listing sollten Sie unbedingt abtippen, 
denn die geringe Abtipparbeit erspart Ihnen hinterher viel 
Mühe. Das Programm arbeitet übrigens nur mit einem Disket¬ 
tenlaufwerk. Wenn Sie bei der Eingabe des Filenamens »$« 
eingeben und < RETURN > drücken, wird das Directory aus¬ 
gegeben. 

Bei anderen Filenamen wird das entsprechende Programm 
untersucht. Zunächst errechnet Listing 6 die Anfangs¬ 
adresse wie beschrieben, dann wird aus dem Directory die 
Block-Anzahl herausgesucht und aus dieser Angabe die 
maximal mögliche Endadresse errechnet. Voraussetzung für 
die Richtigkeit dieser Angabe ist, daß die Block-Anzahl im 
Directory nicht manipuliert worden ist. 

Die Endadressen-Angaben erfolgen übrigens immer um 
eins erhöht, so daß man sie direkt für den S-Befehl überneh¬ 
men kann. Wenn es auf ein paar Bytes hin oder her nicht 
ankommt, reicht die Angabe der maximalen Endadresse. Die 
exakte Endadresse, die auf Wunsch auch bestimmt wird, 
kann man direkt beim S-Befehl einsetzen. 

Außerdem ermöglicht das Programm eine Druckeraus¬ 
gabe, so daß Sie sich einen Katalog mit den genauen Daten 
Ihrer Programme leicht zusammenstellen können. 

Im folgenden sei aber auch eine Methode zur Auffindung 
der exakten Endadresse ohne Hilfsprogramm vorgestellt. Wir 
numerieren die Schritte mit römischen Ziffern. 

I. Speicher mittels F mit einem Füll-Byte, das relativ selten 
ist, füllen. Beispiel: F 1C01 FDFF AB 

SAB hat sich als Füll-Byte bewährt, natürlich sind auch ähn¬ 
liche Zahlen wie $AA oder $FD möglich. $00 oder $FF sollte 
man nicht verwenden, da diese Bytes (insbesondere $00) 
oft am Ende eines Programms stehen - an späterer Stelle 
würden Sie dann merken, daß sich in so einem Fall nicht die 
exakte Endadresse bestimmen ließe. 

II. Programm mittels L laden. Beispiel: L "NAME",08,4000 
Nun sieht unser Speicher folgendermaßen aus: 

A) * * * Speicherbeginn-Programmbeginn * * * 

B) *** Programmbeginn (im Beispiel $4000)*** 

C) * * * Programmcode * * * 

D) * * * Programmende (letztes Byte) * * * 

E) * * * Füll-Bytes (im Beispiel $AB-Bytes) * * * 

F) * * * Speicherende * * * 

Die Endadresse ist nun der Punkt D, also die letzte Spei¬ 
cherzelle vor dem Bereich, der nur mit Füll-Bytes gefüllt ist. 
Da für den-S-Befehl die Endadresse immer um eins erhöht 
werden muß, können wir gleich Punkt E nehmen (Anfangs¬ 
adresse des Bereichs, der nur mit Füll-Bytes belegt ist). 

Vor dem Laden (Punkt II) war der gesamte Speicher ab 
Stelle B mit Füll-Bytes belegt; durch das Laden wurde ein Teil 
der Füll-Bytes vom Programmcode ersetzt. Da es sich beim 
geladenen Programm in der Regel jedoch nicht um den gan¬ 
zen Speicher handelt, ist noch der Bereich ab Stelle E mit den 



Füll-Bytes belegt. Folglich ist die erste Adresse, ab der - bis 
Speicherende - nur noch Füll-Bytes stehen, die Endadresse 
des Programms plus eins ist die tatsächliche Endadresse des 
Programms für den S- beziehungsweise BSAVE-Befehl. 

Im nächsten Schritt werden wir diese Endadresse nun 
ermitteln. 

III. Grobeingrenzung des Bereichs, der nur aus Füll-Bytes 
besteht, mittels H. 

Das Problem hierbei ist, daß der Wert des Füll-Bytes - 
wenn auch nur selten - sicher ebenfalls im Programmcode 
vorhanden ist. Wenn wir nun mit H den Speicher ab der 
Anfangsadresse des Programmcodes nach dem Füll-Byte 
durchsuchen lassen (im Beispiel: H 4000 FDFF AB), so fin¬ 
det der Monitor ab und zu das Füll-Byte. Ab einem gewissen 
Punkt, der mit ziemlicher Sicherheit die Endadresse plus eins 
ist, findet der Computer eine Adresse nach der anderen. 
Wenn dies der Fall ist, sollten Sie unbedingt die Ausgabe mit 
< RUN/STOP > unterbrechen. Ungefähr können Sie jetzt an 
den gefundenen Adressen erkennen, ab welcher Stelle nur 
noch Füll-Bytes stehen: ab der erstgenannten Adresse, von 
der an nur noch Füll-Bytes stehen. 

Meist haben Sie nun schon die Adresse ausfindig gemacht, 
aber wenn Sie noch unsicher sind, gibt es die »Feinbestim¬ 
mung«. 

Zeigen Sie den Bereich an, der Ihrer Meinung nach in Frage 
kommt, und suchen Sie genau die Stelle heraus, ab der nur 
Füll-Bytes stehen. 

Das war dann das Verfahren ohne Hilfsprogramm. Sie wer¬ 
den es vor allem auf anderen Computern, auf denen das Hilfs¬ 
programm nicht läuft, fast unverändert verwenden können. 
Beim Arbeiten mit dem CI28 sollten Sie doch das Hilfspro¬ 
gramm verwenden - wie gesagt, die Abtipparbeit, die sich 
ohnehin in Grenzen hält, wird sich mehrfach lohnen. 

Urtar. - Drei-Schritte-Verfahren kommt vor allem bei der 
Arbeit mit der Datasette zur Anwendung, es hat aber auch 
gezeigt, wieviel man mit dem Monitor ermitteln kann, was 
sonst nicht möglich ist. 

Dafür, daß Sie sich so lange mit der Lade/Speicher-Theorie 
abgemüht haben, sollen Sie durch einen kleinen Trick belohnt 
werden. 

Leider existiert im Basic 7.0 kein Befehl zum Speichern der 
Bitmap der hochauflösenden Grafik (im 40-Zeichen-Modus 
natürlich). 

Wenn man nun weiß, daß die Grafik bei $2000 (#8192) 
beginnt und genau 64000 Bit (1 Bit pro Pixel), also 8000 
Byte, umfaßt, kann man die Endadresse auch ausrechnen: 
Endadresse. Bitmap = $2000 + #8000 = $3F40 = 
#16192 

Da zur Endadresse 1 addiert werden muß, kann man im 
Monitor die Grafik-Bitmap folgendermaßen speichern: 

S "BITMAP",08,2000 3F41 

Über Basic geht dies mit 
BSAVE * BITMAP ".P8192 TO P16193 

Die gespeicherte Bitmap läßt sich leicht über BLOAD "BIT¬ 
MAP" oder L "BITMAP",08 (im Monitor) laden. 


Druckerausgabe mit dem Monitor 


Bis jetzt haben wir Ihnen, um Sie nicht mit zu viel Informatio¬ 
nen zu belasten, verschwiegen, wie man die Ausgaben des 
TEDMON auf den Drucker leitet. 

Als Beispiel wollen wir den Bereich $FC00 bis $FC30 in 
Bank 15 ($F) auf den Drucker dumpen lassen. Dazu gehen 
wir folgendermaßen vor: 

OPEN 4,4:CMD 4:MONITOR 

Sie sehen nun, wie die Monitor-Einschaltmeldung auf dem 
Drucker ausgegeben wird. 
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Ferner blinkt der Cursor - wie normal. 

M FFCOO FFC30 

Sie sehen nun, wie eine Dump-Zeile nach der anderen aus¬ 
gegeben wird - auf dem Drucker! 

Aber Vorsicht: Die letzte Zeile befindet sich wahrscheinlich 
noch im Drucker-Puffer und nicht auf dem Papier. Wenn Sie 
einen weiteren Ausgabe-Befehl ausführen lassen, wird 
zuerst diese letzte Zeile ausgegeben und dann die neue Aus¬ 
gabe. Wenn Sie aber den Monitor verlassen wollen, lassen 
Sie bitte Ihren Drucker eingeschaltet und geben Sie zuerst X 
ein. Dann schließen Sie noch über 
PRINT # 4: CL0SE4 

den Druckerkanal. Wenn Sie diese letzten Befehle nicht ein¬ 
geben, wird unter Umständen eine Ausgabe-Zeile ver¬ 
schluckt! 

Die Druckerausgabe ist vor allem dann sinnvoll, wenn man 
Maschinenprogramme disassembliert (?) oder dumpt. Falls 
Ihnen noch nicht bekannt ist, was Disassemblieren, Assem- 
blieren oder Registeranzeige sind, so erfahren Sie alles dar¬ 
über in den folgenden Abschnitten. 

TEDMON und Maschinensprache 


Nachdem wir uns bislang nur mit den Anwendungsmöglich¬ 
keiten des TEDMON auf Basic-Programme befaßt haben, 
sollen nun auch die Maschinenprögrammierer auf ihre 
Kosten kommen. 

Die bisher erklärten Befehle haben als Basis den M-Befehl, 
denn alle stehen in enger Verbindung mit ihm. Bei den Ein/ 
Ausgabe-Befehlen, die für jede Art Anwendung des Monitors 
interessant sind und auch entsprechend besprochen wur¬ 
den, kann man das allerdings nicht sagen. 

Im folgenden werden wir einige Befehle, die speziell für die 
Anwendung des TEDMON auf Maschinenprogramme vorge¬ 
sehen sind, besprechen. 

Die Basis dieser Befehle ist wohl der A-Befehl, den wir aller¬ 
dings nicht als ersten besprechen (M war ja auch nicht unser 
erster Befehl). 

Den ersten Kontakt mit einer Monitor-Funktion für die 
Behandlung von Maschinenprogrammen haben wir schon 
beim Starten des Monitors über MONITOR. Es handelt sich 
hierbei um die Registeranzeige (englisch »register display«). 

Diese haben wir zunächst übergangen, hier soll aber jedes 
Detail dieser Registeranzeige besprochen werden. 

Wenn der Monitor über den Assembler-Befehl BRK akti¬ 
viert wird, so merkt sich der Monitor den Zustand der einzel¬ 
nen Register. 

Diese werden dann, nachdem sie zwischengespeichert 
worden sind, automatisch angezeigt: 

PC SR AC XR YR SP - Erklärungszeile 
;FBOOO 00 00 00 00 F8 - Werte der Register 

Diese Meldung erhalten Sie beim Start über den Basic- 
Befehl MONITOR, da bei diesem der TEDMON von $B000 
in Bank $F angesprungen wird. Daher steht unter PC (PC 
steht für »program counter« oder deutsch »Programmzähler«) 
die Adresse SFBOOO. An dieser Adresse ist beim Start über 
den Maschinenbefehl BRK (Opcode: $00) erkennbar, von 
wo aus der BRK erfolgte. Dazu muß man allerdings vom PC- 
Wert 2 subtrahieren. Außerdem ist zu beachten, daß als Spei¬ 
cherbank bei PC immer $F angegeben wird. Der Grund dafür 
ist der, daß der Prozessor bei einem BRK wie bei anderen, 
ähnlichen Impulsen (Reset, IRQ, NMI) immer $F als Spei¬ 
cherbank einstellt. 

SR ist der Zustand des Statusregisters, das die einzelnen 
Statusbits enthält (N-, V-, B- ,D-, I-, Z- und C-Flag). Mit Hilfe der 
Befehle % und $ kann man nun einzelne Bits behandeln und 
das Ergebnis als ganzes Byte ins Hexadezimalformat umwan¬ 
deln lassen. 


Die drei darauffolgenden Zwei-Buchstaben-Abkürzungen 
stehen für Akku, X- und Y-Register: 

AC = ACcumulator = Akkumulator 
XR = X Register = X-Register 
YR = Y Register = Y-Register 

SP ist der Stapelzeiger (englisch »stack pointer«), $F8 ist 
der Initialisierungswert des Stapelzeigers. Bei dem Wert, der 
unter SP steht - also dem Stapelzeigerinhalt - kann es durch¬ 
aus Vorkommen, daß bei Ihnen andere Werte als $F8 stehen 
(zum Beispiel $F9). Bei Reset und gleichzeitigem Halten von 
< RUN/STOP > wird übrigens auch der Monitor angesprun¬ 
gen. Unter SP steht dann $FF (der Initialisierungswert des 
Stapelzeigers, den das Betriebssystem in der Resetbehand¬ 
lung gibt). 

In der Zeile unter den Zwei-Buchstaben-Abkürzungen, die 
nun erklärt sind (die Bedeutung der ausgeschriebenen Wör¬ 
ter sind einem Assembler-Lehrbuch zu entnehmen), stehen 
die einzelnen Inhalte der darüberstehenden Register im 
Hexadezimalformat. 

Das Semikolon »;« am Anfang der Zeile, die die einzelnen 
Werte angibt, ist ein eigenständiger Befehl, der uns ein 
Ändern der Registerinhalte ermöglicht. Wie beim M-Befehl 
(dort ist der Änderungsbefehl das >) müssen wir dazu nur 
die alten Werte überschreiben. Soviel Informationen finden 
Sie in jeder guten Beschreibung, es muß aber eins unbedingt 
gesagt werden, um Mißverständnisse auszuräumen. 

Die Register werden nicht in Wirklichkeit geändert! Wenn 
Sie also mit < RETURN > die Register übernehmen lassen, 
ändern sich nicht die echten Prozessorregister (da der Moni¬ 
tor ein Maschinenprogramm ist und somit dauernd die Regi¬ 
ster einsetzt und dabei natürlich ändert, wäre dies auch 
weder möglich noch sinnvoll), sondern nur die Zwischen¬ 
speicher der Prozessorregister. 

Ditö Zwischenspeicher werden beim Anspringen eines 
Maschinenprogramms über den G-Befehl, der noch bespro¬ 
chen wird, in die tatsächlichen Prozessorregister übernom¬ 
men. 

An späterer Stelle werden wir uns wieder mit der Register¬ 
anzeige und vor allem der Anwendung beschäftigen. 
Zunächst soll uns aber der Start des Monitors über den BRK- 
Befehl interessieren. 

Der Start über den Assembler-Befehl BRK 


Wenn der Prozessor bei der Abarbeitung eines Maschinen¬ 
programms auf den Code $00 als Befehl trifft, interpretiert er 
diesen als BRK-Anweisung. BRK (Abkürzung für »BReaK«) 
ist das Mnemonic für den Befehl, der einen Abbruch des 
aktuellen Maschinenprogramms veranlaßt. 

Eine Wirkung des BRK-Befehis ist die, daß der Programm¬ 
zähler (PC) auf den Stapel gelegt wird. Dann springt der Pro¬ 
zessor über einen Vektor, der im ROM steht, zur BRK- 
Routine des Betriebssystems. Diese wiederum springt über 
den BRK-Vektor (auch Break-Vektor genannt) $0316/$0317 
zu einer weiteren BRK-Routine ab $B003, die (fast) dem 
Monitor-Start gleichkommt. 

In der Testphase eines Maschinenprogramms ist es also 
ganz interessant, an allen möglichen Stellen des Programms 
BRK-Befehle einzusetzen; wenn der Computer auf so einen 
BRK stößt, wird der Monitor gestartet und dank der automati¬ 
schen Registeranzeige kann man bequem sehen, wie das 
Programm gearbeitet hat. 

Der Disassemblier-Befehl: D 


Bevor wir uns nun in die Assemblier- und Disassemblier- 
Befehle stürzen, müssen wir schnell noch die Begriffe klären. 
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Beide Formen der Programmbehandlung dienen der 
Maschinensprache-Programmierung. Maschinensprache ist 
die Sprache, die die CPU (»Central Processing Unit« = zen¬ 
trale Prozessoreinheit) als Hauptsteuerungsbaustein unse¬ 
res Computers versteht. Diese Maschinensprache besteht 
nur aus elektronischen Signalen, also 0- und 1-Bits. 8 Bit 
gehören auch hier fest zusammen (Byte). Ein Byte kann 
sowohl für einen Befehl (zum Beispiel LDA) als auch für einen 
Operand stehen. Wenn man Bytes hexadezimal darstellt, 
sieht »LDA # $20« folgendermaßen im Speicher aus: A9 20. 

Mit LDA #$20, beispielsweise als ASCII-Code im Spei¬ 
cher abgelegt, kann der Computer ohne bestimmte Pro¬ 
gramme nichts anfangen. Er versteht zunächst nur 
%10101001 (ein- aus- ein- aus- ein- aus- aus- ein) als Anwei¬ 
sung zum Laden des Akkumulators. Wenn wir statt dessen 
A9 schreiben, so machen wir es damit für uns lesbarer. An 
der Tatsache, daß der Computer nur binär arbeitet, ändert 
dies nichts. 

Am Rande sei hier nur erwähnt, daß der Computer genau¬ 
genommen auch kein Basic versteht. Das geht nur aufgrund 
eines sehr langen Maschinenprogramms, das fest im ROM 
eingebaut ist und »Basic-Interpreter« heißt, da es Basic- 
Befehle in die für die CPU verständliche Maschinensprache 
»übersetzt«. 

Nun aber wieder zur Darstellung eines Maschinenpro¬ 
gramms: Auch wenn der erste Schritt getan ist, indem wir 
anhand von hexadezimalen Bytes das Programm »lesen« 
können, so ist es doch sehr schwer, A9 20 - wenn man es 
beim Memory-Dump erhält - als »lade Akku mit $20« zu ver¬ 
stehen. Zudem gibt es ja auch Befehle, die nicht nur einen 
Operand ($20), sondern gleich 2 (LB und HB) oder gar 
keinen haben, und dann müßte man zusätzlich zu unzähligen 
Opcodes auch die Länge der darauffolgenden Parameter 
wissen. e^en 

Kurzum, es ist nahezu unmöglich. Daher stellen wir diesen 
Befehl auch mit »LDA # $20« dar. Diese Schreibweise nennt 
man mnemonische Schreibweise, da »LDA« ein Mnemonic 
(das Wort »Mnemonic« kommt aus dem Griechischen und 
heißt »Gedächtnishilfe«) ist. LDA ist zwar nicht so schön ver¬ 
ständlich wie ein Basic-Befehlswort (zum Beispiel COLLI¬ 
SION oder COLOR), aber immerhin besser als A9. LDA ist 
nämlich die Abkürzung eines sinnvollen englischen Aus¬ 
drucks: LoaD Accumulator. 

Ein weiterer Vorteil der Mnemonics ist, daß man weniger 
Mnemonics als Opcodes benötigt, da auf ein Mnemonic 
mehrere Adressierungsarten entfallen können (wobei das 
Mnemonic jedesmal LDA heißt), zum Beispiel LDA $20 oder 
LDA # $20 oder LDA ($20),Y, wogegen jede neue Adressie¬ 
rungsart für ein und denselben Befehl einen neuen Opcode 
braucht. 

Die Mnemonics sind also die eindeutig bessere Schreib¬ 
weise eines Maschinenprogramms, da sie einer »Sprache« 
schon viel näher kommen als Nullen und Einsen oder Hex- 
Bytes. Der Haken dabei ist jedoch, daß der Computer wie 
gesagt mit den Mnemonics nichts anzufangen weiß. Natürlich 
könnte man sein Programm auf dem Papier in Mnemonics 
schreiben und dann in mühevoller Kleinarbeit ins hexadezi¬ 
male Format umwandeln, so daß man es mit dem Monitor ein¬ 
geben kann. In den Anfangsstadien des Computerns war 
dies auch so. Mittlerweile sind wir jedoch schon viel weiter, 
und da dieses Umwandeln eine reine Rechenaufgabe ist, las¬ 
sen wir es vom Computer durchführen. Ein solches Umwan¬ 
deln von Mnemonics ins Speicherformat nennt man »Assem- 
blieren« (gesprochen: »äßemblieren«). Ein Programm, das 
diese Umwandlung durchführt, nennt man »Assembler« 
(gesprochen: »äßembler«). Im TEDMON ist ein solcher 
Assembler in Primitivstform eingebaut. Den entsprechenden 
Befehl lernen wir im nächsten Abschnitt kennen. Beim Wort 
Assembler bestehen, da man statt Maschinensprache oft. 
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auch Assembler(-sprache) sagt, Verwechslungsmöglich¬ 
keiten, die der Sinnzusammenhang allerdings oft ausräumt. 

Der dem »Assemblierern entgegengesetzte Vorgang, 
nämlich das Umwandeln des Speicherformats eines Pro¬ 
gramms in mnemonische Schreibweise - zwecks besserer 
Lesbarkeit - heißt »disassemblieren« (sprich: »disäßemblie- 
ren«). 

Der entsprechende Befehl heißt D (Abkürzung für »disas- 
semble«). Die Syntax entspricht der des M-Befehls, mit dem 
Unterschied, daß statt eines Dumps ein Disassemblerlisting 
des entsprechenden Bereichs ausgegeben wird. Für das 
Weglassen einzelner Parameter bei »D Anfang Ende« gelten 
die gleichen Regeln wie bei M. Die Syntax von D ist noch ein¬ 
mal in Bild 18 zusammengefaßt. 

Als Beispiel wollen wir ein Stück aus dem C128-ROM 
disassemblieren; geben Sie dazu bitte »D F4018 F4023« 
ein. Das Ergebnis sehen Sie auf Ihrem Bildschirm und in 
Bild 19. 

Eine Disassemblerzeile hat das Format ».Adresse Hex- 
Bytes Mnemonic Operand«. Der Punkt ist eine andere 
Schreibweise für den Assemblier-Befehl und ermöglicht 
Änderungen (am Beispiel jedoch nicht, da wir Teile des 
ROMs disassembliert haben), worauf wir erst im nächsten 
Abschnitt näher eingehen wollen. 

Die Adresse gibt wie bei M an, ab welcher Basisadresse 
disassembliert wurde. Die Hex-Bytes (minimal eines, maximal 
drei) sind das Hex-Dump der Bytes, die der Befehl umfaßt. 
Mnemonic und Operand sind dann schließlich die eigentliche 
Leistung des D-Befehls, denn die Hex-Bytes erscheinen nun 
in mnemonischer Schreibweise. 

Die Fragezeichen in den Zeilen F4021/F4022 zeigen an, 
daß die Disassemblierroutine auf einen Opcode traf, der kei¬ 
nen Befehl vertritt. Es handelt sich in solchen Fällen entwe¬ 
der um reine Daten, die beispielsweise als ASCII-Codes 


Befehl: D 

Syntax: D (Anfangsadresse) (Endadresse) 

Wirkung: disassembliert Bereich von Anfangs¬ 

adresse bis Endadresse. Falls die 
Endadresse fehlt, werden 21 Zeilen 
von Anfangsadresse an disassem¬ 
bliert, falls kein Parameter übergeben 
wird: 21 Zeilen von der letzten über 
M oder D bearbeiteten Adresse an. 
englisches Wort: Disassemble (disassemblieren) 

Bild 18. Kurzübersicht zum Befehl D 


MONITOR 

PC 

SR flC XR 

VR SP 

; FB000 

00 00 00 

00 F8 

. F4018 

R9 00 

LDfi #$00 

. F401H 

85 15 

STfl $15 

. F401C 

58 

CLI 

. F401D 

4C 37 40 

JMP $4D37 

. F402O 

00 

BRK 

. F4021 

FF 

??? 

. F4022 

FF 

??? 

. F4023 

20 7fl 41 

JSR $4171=1 


Bild 19. Beispiel für die Anwendung des D-Befehls 


Befehl: 

A 

Syntax: 

A Anfangsadresse Befehl 

Wirkung: 

assembliert den Befehl ab Anfangs- 


adresse direkt in den Speicher. 

englisches Wort: Assemble (assemblieren) 


Bild 20. Kurzübersicht zum Befehl A 


abgelegt sind, oder - wie in diesem Fall - um reine Füll-Bytes. 

Wie man auch aus F4023 ersehen kann, wird das Disas¬ 
semblieren unmittelbar nach einem solchen Undefinierten 
Byte fortgesetzt. 

Meist handelt es sich bei Undefinierten Bytes um Daten 
oder Füll-Bytes, es gibt jedoch auch eine dritte Möglichkeit, 
die nicht so bekannt ist: Undefinierte Bytes können auch 
Undefinierte Opcodes sein! 

Zusätzlich zu den Standard-6502-Befehlen kennt fast 
jeder 65xx-Prozessor zusätzliche Opcodes, die beim Bau 
des Prozessors unbeabsichtigt waren, aber aufgrund der 
Prozessor-Struktur verarbeitet werden und meistens auch 
ihre Wirkung haben. Diese Befehle sind zwar - da sie ja unbe- 
absichtig sind - von Prozessor zu Prozessor und von Version 
zu Version verschieden, aber werden gerne verwendet, um 
ein Programm unlesbarzu gestalten. Einige dieser Opcodes 
führen zum Absturz des Computers, andere entsprechen 
zwei Befehlen (zum Beispiel INC und SBC), wieder andere 
entsprechen dem NOP-Befehl und einige haben so kompli¬ 
zierte Wirkungen, daß sie bei der Programmierung wirklich 
keinen Nutzen bringen. 

Der Assemblier-Befehl: A 


Während der Disassemblier-Befehl standardmäßig zu einem 
Monitor gehört, ist der Assemblier-Befehl erst im Laufe der 
Zeit zum Standard geworden. Der C128-Monitor kennt einen 
solchen; er heißt A als Abkürzung für »assemble« (assemblie- 
ren). Die Syntax ist (siehe auch Kurzübersicht in Bild 20) »A 
Anfangsadresse erster Befehl«. 

Beispiel: Geben Sie »A 01D00 LDA # $0D« ein. Die Syntax 
der Mnemonics soll hier nicht weiter beschrieben werden, 
sie die gleiche wie die, die der D-Befehl bei der Ausgabe 
verwendet. 

Wenn eine Zeile nicht korrekt ist, erscheint ein Fragezei¬ 
chen. Andernfalls - also wenn die Zeile angenommen wurde 
- erscheint in der nächsten Zeile »A nächste Adresse« und 
dahinter ein blinkender Cursor als Aufforderung zur Eingabe 
der nächsten Zeile. Nach unserem Beispiel »A 01D00 LDA 
#$0D« würde also »A 01D02« erscheinen. Geben Sie dann 
»JSR SFFD2« ein und drücken Sie < RETURN >. Wieder 
wird die Zeile angenommen. 

Falls Sie aus dem Assemblieren aussteigen wollen, 
drücken Sie einfach < RETURN >. Nach »JSR $FFD2« 
sehen Sie dann »A 01D05«. Geben Sie nun »LDA # $21« ein 
und drücken Sie RETURN, bei der nächsten Zeile geben Sie 
bitte »JMP $FFD2« ein. Die darauffolgende Zeile wollen wir 
nicht mehr eingeben. Drücken Sie also einfach ohne Befehls¬ 
eingabe auf < RETURN >. 

Nun können wir unser kleines Maschinenprogramm über 
»D 01D00« disassemblieren. Wenn wir den Monitor über X 
verlassen und »BANK15:SYS7424« starten, gibt das Pro¬ 
gramm zuerst einen Zeilenvorschub (Carriage Return oder 
CR) und dann ein Ausrufezeichen aus. 

Falls Sie nicht wollen, daß CR ausgegeben wird (erste 
Zeile: LDA # $0D, $0D = # 13 = ASCII-Code von CR), müs¬ 
sen Sie unser Programm nur mit »D 1D00« disassemblieren, 
und in der ersten Zeile den Operand des LDA-Befehls ($0D) 
mit einem neuen Wert (zum Beispiel $93 für »Bildschirm 
löschen«) überschreiben. 

Durch Drücken von < RETURN > wird eine solche Ände¬ 
rung übernommen. Am Anfang der nächsten Zeile steht dann 
wieder der A-Befehl, da der Punkt».« am Beginn einer Disas¬ 
semblerzeile identisch mit dem A-Befehl ist und somit eine 
Assemblierung bewirkt. 

An dieser Stelle muß noch ein Hinweis für Einsteiger gege¬ 
ben werden: Wenn der Monitor eine Zeile nicht annimmt, 
obwohl Sie sicher sind, daß die Zeile syntaktisch korrekt ist, 
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gibt es mehrere mögliche Ursachen: 

- Sie verwenden eine unerlaubte Adressierungsart: 

JSR ($2000) gibt es beim 8502 ebensowenig wie 
LDA ($2000),Y (obwohl »LDA ($20),Y« korrekt ist) 

- Sie überschreiten bei Branch-Befehlen (BNE, BEQ, BCS 
und so weiter) die Sprungweite (128 Byte vor und zurück, 
nicht mehr): 

01D00 BNE F000 ist nicht möglich 
01D00 BNE 1D04 dagegen schon. 

Auf jeden Fall ist die Wahrscheinlichkeit, daß am Computer 
etwas defekt ist, gering, wenn beim A-Befehl etwas nicht 
funktioniert. Sehen Sie in einem solchen Fall lieber in Ihrer 
Maschinensprache-Literatur nach. 

Sie sehen, das Assemblieren mit dem A-Befehl des TED- 
MON ist kein Zuckerschlecken, sondern mühsam und fehler¬ 
anfällig. Vor allem, wenn man an Programmen, die mit diesem 
»line by Iine«-Assembler erstellt wurden, Änderungen vor¬ 
nehmen will, stellt sich bald der »Programmierfrust« ein. 

Während das Schreiben von Kleinst-Routinen mit dem 
TEDMON noch gerade möglich ist, wird das Programmieren 
längerer Routinen so mühselig, daß man (fast) keine Erfolgs¬ 
aussichten hat. Daher gibt es noch eine höhere Stufe des 
Assemblerprogrammierens, nämlich die sogenannten 
Makroassembler. Ein Makroassembler ist ein Programm, das 
die Eingabe von Maschinenprogrammen wie in einer Textver¬ 
arbeitung ermöglicht, wobei die Eingaben nicht sofort in den 
Speicher übernommen werden. Außerdem kann man ein¬ 
zelne Stellen im Programm mit einem Label markieren, klei¬ 
nere Befehlsfolgen als Makros definieren und vieles mehr. 

Mit einem Makroassembler kann man effizient in Assem¬ 
bler programmieren, und auch längere Routinen sind kein 
Problem mehr. Leider sind solche komfortablen Assembler 
oft recht teuer (mehrere hundert Mark!). Eine erfreuliche 
Ausnahme ist da der TOP-ASS von Markt STechnik, der für nur 
89 Mark erstaunliche Leistungsmerkmale bietet und es mit 
jedem 300-Mark-Assembler aufnehmen kann. 

Der Sprung-Befehl des Monitors: G 


Unser Beispielprogramm (Ausgabe von CR und »!«) aus dem 
letzten Abschnitt haben wir, um es zu testen, über »BANK 
Bankeinstellung: SYS Startadresse« gestartet. Da man mit 
dem Monitor des öfteren in die Lage kommt, daß man ein 
Maschinenprogramm starten will, gibt es auch hierfür einen 
Befehl. 

Er heißt G (von englisch »to go« = deutsch »gehe«) und hat 
zwei mögliche Syntaxformen. Die erste Möglichkeit ist »G 
Adresse« (zum Beispiel »G F1D00« bei unserem Beispielpro¬ 
gramm aus dem letzten Abschnitt). Die zweite ergibt sich dar¬ 
aus, daß man nur »G« (also ohne Adresse oder sonstige Para¬ 
meter) angibt. Dann wird die Adresse, die als aktueller PC gilt 
(siehe Abschnitt »TEDMON und Maschinensprache«), als G- 
Adresse eingesetzt. 

In jedem Fall bewirkt der G-Befehl einen Sprung zur jeweili¬ 
gen Zieladresse. Vorher werden noch die Register mit den 
Werten, die Sie beim Start des Monitors hatten, geladen. 
Eventuelle Änderungen der Registerinhalte machen sich erst 
jetzt bemerkbar! 


Befehl: G 

Syntax: G (Startadresse) 

Wirkung: springt unter Berücksichtigung der 

Register zur angegebenen Start¬ 
adresse. Wird diese weggelassen, so 
zum bei PC angezeigten Wert, 
englisches Wort: Go (gehe) 

Bild 21. Kurzübersicht zum Befehl G 


Daß die Syntax des G-Befehls eine der einfachsten des 
Monitors ist, können Sie Bild 21 entnehmen. 

Ein Hinweis: Wenn am Ende des angesprungenen Maschi¬ 
nenprogramms ein RTS-Befehl steht, so bewirkt dieser dann 
keinen Rücksprung in den Monitor; ein solcher wird aber 
dafür durch den BRK-Befehl bewirkt. Wenn Sie unser Bei¬ 
spielprogramm aus dem letzten Abschnitt mittels »G F1D00« 
starten, so arbeitet es zwar korrekt; da es aber durch einen 
RTS-Befehl am Ende der Unterroutine $FFD2 beendet wird, 
erscheint ein »9SYNTAX ERROR«. Dieser ist jedoch nicht 
weiter tragisch, da er ja nicht auf einen Programmfehler hin¬ 
weist. 

Eine recht nützliche Anwendung des G-Befehls ist »G 
FFF3D«. Mit diesem Befehl kann man jederzeit aus dem 
Monitor heraus einen Reset hervorrufen. 

Das Anzeigen der Registerinhalte: R 


Wie wir schon erwähnt haben, erfolgt beim Start des Moni¬ 
tors die automatische Registeranzeige. Da man die Register 
jedoch öfters sehen will - auch längere Zeit nach dem Start 
des Monitors -, ist ein Befehl nötig, der jederzeit eine Register¬ 
anzeige ermöglicht. Dieser heißt einfach R (»register display« 
= Registeranzeige, siehe auch Bild 22). R arbeitet wie die 
schon beschriebene Registeranzeige; genauer gesagt, beim 
Monitorstart wird die Routine zum R-Befehl aufgerufen. 

Eine nähere Beschreibung erübrigt sich also. Auch hier gilt, 
daß man die Register ändern kann. 

Die angezeigten oder geänderten Registerinhalte werden 
beim G-Befehl, den wir im letzten Abschnitt behandelt haben, 
endgültig in die tatsächlichen Prozessorregister übernom¬ 
men. 

Um etwas Übung mit den Befehlen R (und »;« zum Ändern 
der RLgisterinhalte) und G zu bekommen, wollen wir eine 
kleine Anwendung durchgehen. 

Wenn man die Einsprungadresse $FFD2 in Bank $F (Bank 
15) anspringt - wie es unser Beispiel beim A-Befehl getan hat 

- wird das Zeichen ausgegeben, dessen ASCII-Code im 
Akkumulator steht. 

Wir wollen nun den CHR$-Code $07 (= #7, entspricht 
dem akustischen Klingelzeichen) ausgeben lassen. Dazu 
gehen wir folgendermaßen vor: 

- R eingeben. Nun erscheinen die Registerinhalte. 

- Wert unter »AC« auf 07 ändern. 

- »G FFFD2« eingeben. Das Zeichen wird nun ausgegeben. 
Da die ROM-Routine ab $FFD2 durch einen RTS-Befehl 
beendet wird, erscheint - wie Sie im letzten Abschnitt 
über den G-Befehl erfahren haben - ein SYNTAX ERROR. 
Dieser ist jedoch zu ignorieren. 

Probieren Sie doch einmal verschiedene Zeichen durch 
(zum Beispiel die Steuerzeichen für die Cursor-Farbe oder 
ähnliche). 

Durch dieses Arbeiten mit den Registeranzeigen und 
Sprungbefehlen ist es möglich, auch eigene Routinen auf 
Funktionsweise bei bestimmten Registerinhalten zu über¬ 
prüfen. 

Jetzt haben wir alle Befehle 


Mittlerweile sind alle Befehle des Monitors besprochen, und 
Sie werden zugeben, daß das Lernen dieser Befehle wirklich 
keine Überforderung war (denken Sie einmal an Ihre Basic- 
oder Maschinensprache-Anfängerzeiten zurück). 

Von nun an werden wir die Anwendung des gesamten 
Monitors, also nicht nur einzelner Befehle, besprechen. 
Dabei soll uns zuerst die Anwendung auf Maschinenpro¬ 
gramme interessieren, danach werden wir mit der Basic- 
Anwendung fortfahren. 
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Die Kooperation TEDMON/Maschinensprache soll vor 
allem deswegen zuerst behandelt werden, weil die letzten 
Abschnitte gerade erst die Befehle zur Anwendung auf 
Maschinenprogramme erläutert haben. Als Nur-Basic- 
Programmierer, den an Maschinenprogrammen höchstens 
die ASCII-Tabellen zum Ändern und Einträgen eigener Mel¬ 
dungen interessieren, müssen Sie sich ein wenig gedulden, 
aber die Anwendungen, die dann folgen, werden Sie mit 
Sicherheit entschädigen. 

Um Ihnen die Arbeit mit den gelernten Befehlen zu erleich¬ 
tern, finden Sie in Form von Bild 23 eine Übersicht (Referenz) 
aller TEDMON-Befehle. Damit diese möglichst wenig Platz 
beansprucht (was das Finden bestimmter Informationen 
erleichtert), wurde eine möglichst knappe - aber präzise - 
Farm der Syntax-Angabe gewählt. 

Der erste Buchstabe einer Befehlszeile ist in jedem Fall das 
Kommando (zum Beispiel M). Die Parameter werden mit 
Buchstaben angegeben. Vier Buchstaben (zum Beispiel 
XXXX) bezeichnen eine vierstellige, zwei Buchstaben eine 
zweistellige Hexadezimalzahl. Natürlich kann man beim TED- 
MON erfreulicherweise die Parameter auch in anderen 
Zahlensystemen angeben. Mit Hilfe der Anzahl der Hex- 
Stellen ist aber eindeutig festgelegt, in welchem Bereich der 
Parameter liegen muß: 

zwei Stellen = $00 bis $FF = #0 bis #255 = 
%00000000 bis %11111111 
vier Stellen = $0000 bis $FFFF = # 0 bis # 65535 

Das B vor den Zahlen (zum Beispiel BXXXX) zeigt an, daß 
man im Falle der hexadezimalen Zahlendarstellung zusätzlich 
die Speicherbank angeben kann. 

Eingeklammerte Parameter können stehen, müssen aber 
nicht. In Anführungszeichen stehende Parameter (nur bei L, 
S, V) sind Strings und müssen auch beim Monitor in Anfüh¬ 
rungszeichen stehen. 

Suchen nach Maschinen¬ 
sprachebefehlen mittels H 


Da jeder Maschinensprachebefehl im Speicher als Opcode 
(Opcode = Operation CODE = Verarbeitungscode) abge¬ 
legt wird, kann man nach bestimmten Befehlen suchen, 
indem man den Opcode suchen läßt. 

Wenn man aber einen Assembler zur Verfügung hat, der im 
Editor eine Suchfunktion bietet, so sollte man lieber nach der 
mnemonischen Schreibweise im Quelltext suchen (sofern 
man den Quelltext hat und es sich nicht um ein fremdes Pro¬ 
gramm handelt), da das Suchen nach Opcodes einen großen 
Nachteil hat: Ein Befehl hat so viele unterschiedliche Opco¬ 
des wie Adressierungsarten. 

Dieser Nachteil ist selbstverständlich belanglos, wenn man 
die Adressierungsart, die man suchen will, kennt, oder der 
Befehl nur eine einzige Adressierungsart hat (was nur bei 
impliziten Befehlen wie SEI, CLD, INX und so weiter der Fall 
ist). Das Suchen nach einem unmittelbar-adressierten LDA- 
Befehl (in mnemonischer Schreibweise) erfordert nur die 
Suche nach einem einzigen Opcode (nämlich $A9, dem 
Opcode für LDA unmittelbar), wogegen man bei der Suche 
nach allen LDA-Befehlen (also unabhängig von der Adressie¬ 
rungsart) nach acht Opcodes suchen muß: 


Befehl: 

R 

Syntax: 

R 


(keine Parameter) 

Wirkung: 

zeigt Register und Registerinhalte an. 

englisches Wort: Register display (Registeranzeige) 


Bild 22. Kurzübersicht zum Befehl R 


Befehl 

Kurzbeschreibung 

Syntax 

A 

Assemblieren 

A BXXXX Befehl 

C 

Vergleich 

C BXXXX BYYYY BZZZZ 

D 

Disassemblieren 

D (BXXXX) (BYYYY) 

F 

Füllen 

F BXXXX BYYYY ZZ 

G 

Programm starten 

G (BXXXX) 

H 

Suchen 

H BXXXX BYYYY ZI Z2 ... 

ZZ oder H BXXXX BYYYY 
"TEXT 

L 

Laden 

L("NAME")(,XX),(BYYY) 

M 

Memory Dump 

M (BXXXX) (BYYYY) 

R 

Registeranzeige 

R 

S 

Speichern 

S "NAME",XX,BYYY BZZZZ 

T 

Verschieben 

T BXXXX BYYYY BZZZZ 

V 

Verifizieren 

V " NAME " (,XX)(BYYYY) 

X 

Verlassen 

X 

> 

Ändern 

>BXXXX Y1 Y2 ... YY 

@ 

Floppy-Bedienung 

<KI.-a.>(XX)(,BEFEHL) 


Bild 23. Alphabetische Übersicht über alle Befehle des 
TEDMON 


Opcode Adressierungsart mnemonische Schreibweise 
(Bsp) 

SAD absolut LDA $4567 
$A5 Zeropage LDA $45 
$A9 unmittelbar LDA # $45 
$BD absolut-x-indiziert LDA $4567,X 
$B9 absolut-y-indiziert LDA $4567,Y 
$A1 indirekt-x-indiziert LDA ($45,X) 

$B1 indirekt-y-indiziert LDA ($45),Y 
$B5 Zeropage,X-indiziert LDA $45,X 
Das heißt, daß Sie bei der Suche nach allen LDA-Befehlen 
im Dceich $4000 bis $5000 in Bank 0 folgende Befehle 
benötigen würden: 

H 4000 5000 AD sucht die absoluten LDAs, 

H 4000 5000 A5 sucht die Zeropage-adressierten, 

H 4000 5000 A9 sucht die unmittelbar-adressierten, 

H 4000 5000 BD sucht die absolut-x-indizierten, 

H 4000 5000 B9 sucht die absolut-y-indizierten, 

H 4000 5000 AI sucht die indirekt-x-indizierten, 

H 4000 5000 Bl sucht die indirekt-y-indizierten, 

H 4000 5000 B5 sucht die Zeropage-x-indizierten LDAs. 

Sie werden - falls im angegebenen Suchbereich ein 
Maschinenprogramm und nicht zufällige Daten aufbewahrt 
sind - eine Unmenge Adressen erhalten. Es wäre allerdings 
ein Trugschluß, daß an jeder gefundenen Adresse wirklich ein 
solcher Befehl steht (»stehen« muß zwar einer, wenn auch 
der Opcode vorhanden ist, aber die Frage ist, ob dieser inner¬ 
halb eines Maschinenprogramms oder innerhalb von Daten 
steht und womöglich nie durchlaufen wird). 

Es empfiehlt sich daher, jede angegebene Adresse 
genauer zu prüfen; da es sich unter Umständen um recht 
viele handelt, ist die Ausgabe der gefundenen Adressen auf 
den Drucker (siehe Abschnitt über Ein-/Ausgabe) wirklich 
empfehlenswert. 

Zur Prüfung einer bestimmten Adresse darauf, ob es sich 
wirklich um einen Befehl handelt, sollte man einfach »D 
Adresse« eingeben. Bei der angegebenen Adresse steht 
dann der aufgespürte Befehl; da wir nach den Opcodes 
gesucht haben, muß dies ja auch der Fall sein. 

Um nun festzustellen, ob dieser Befehl inmitten eines Teils 
eines Maschinenprogramms steht, sind die dem Befehl 
unmittelbar folgenden Anweisungen zu überprüfen. Handelt 
es sich dabei hauptsächlich um keine Befehle (dann erschei¬ 
nen ja an den betreffenden Adressen Fragezeichen im 
Disassembler-Listing), so gibt es nur zwei Möglichkeiten: 

1. Es wurden bei der Programmierung Undefinierte Opcodes 
verwendet; diese Möglichkeit ist allerdings die seltenste 
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und nur bei kopiergeschützten Programmen denkbar. 

2. Es handelt sich schlicht um keinen Befehl, sondern nur um 
Daten. Ein Unterfall dieser Möglichkeit ist, daß der 
Befehlscode im Operand eines anderen Befehls vorhan¬ 
den ist (im Speicherformat von LDA # $2C - $A9 $2C - 
ist zum Beispiel mit $2C der Opcode des BIT-absolut- 
Befehls vorhanden). 

Der zweite Fall ist - wie gesagt - der eindeutig häufigere. 
In jedem dieser Fälle kann man mit 95prozentiger Wahr¬ 
scheinlichkeit davon ausgehen, daß es sich um keinen ech¬ 
ten Befehl handelt. Falls natürlich ordentliche Befehle 
erscheinen, so kann man gar mit 99prozentiger Sicherheit 
annehmen, daß es sich um einen »echten« Befehl handelt. 

In diesem Zusammenhang möchten wir Ihnen ein interes¬ 
santes Verfahren zur Suche nach einem Bereich, in dem 
Maschinenprogramme liegen, vorstellen. Wenn man zum 
Beispiel ein fremdes Programm hat, in dem viele Tabellen 
(geordnete Daten) untergebracht sind, möchte man vielleicht 
wissen, wo denn eigentlich das Programm liegt. 

Natürlich kann man das ganze Programm disassemblieren 
lassen und dann einfach suchen, aber zur Grobeingrenzung 
des Bereichs ist es ungleich komfortabler, den H-Befehl ein¬ 
zusetzen. 

In »normalen« Maschinenprogrammen ist so ziemlich der 
häufigste Opcode, der nicht als ASCII- oder Bildschirm-Code 
eine sinnvolle Bedeutung hat wie etwa $20 (Opcode für JSR, 
ASCII-Code für Space, Bildschirmcode für Space), der 
Opcode für »LDA #«, also $A9. 

Mit »H Anfangsadresse Endadresse A9« kann man nun den 
gesamten Bereich durchsuchen lassen. An den Stellen, an 
denen das Suchbyte $A9 gedrängt auftritt, kann man anneh¬ 
men, daß es sich um einen Bereich handelt, der vorwiegend 
aus Maschinensprachebefehlen besteht. 

Wenn man die Bedeutung einzelner Adressen in einem 
bestimmten Programm - zum Beispiel dem Betriebssystem 
bei der Erstellung eines kommentierten ROM-Listings - 
näher durchleuchten will, kann natürlich auch hier der H- 
Befehl, von dem Sie jetzt nach und nach merken, wie vielsei¬ 
tig er ist (auch wenn es auf den ersten Blick gar nicht so aus¬ 
sieht), eingesetzt werden. 

Wir müssen alle Befehle suchen, die auf die Adresse 
zugreifen. Bei Zeropage-Adressen geht man folgenderma¬ 
ßen vor (nehmen wir das Beispiel der Adresse $15): 

1. »H Anfangsadresse Endadresse Adresse«, 
also zum Beispiel »H F4000 F4200 15« 

Sie erhalten dann alle Adressen, an denen $15 steht. Wenn 
Sie jedoch »D gefundene Adresse« eingeben, werden Sie 
keinen Befehl, der auf $15 zugreift, finden. 

Die Adresse, ab der dann überhaupt ein Befehl stehen 
kann, der die Zeropage-Adresse als Operand hat, ist die 
gefundene Adresse minus 1. 

2. Test der gefundenen Adresse 

Das Testen, ob die gefundenen Werte wirklich Rück¬ 
schlüsse auf einen Befehl, der die gesuchte Zeropage- 
Adresse bearbeitet, zulassen, geht relativ einfach. 

Sie müssen nur »D Adresse-1« eingeben, und schon sehen 
Sie den entsprechenden Befehl disassembliert. Wenn es 
sich um einen Befehl, der auf die gesuchte Adresse zugreift, 
handelt, so sehen Sie ein Disassembler-Listing von diesem. 
Andernfalls steht ab der gefundenen Adresse minus 1 kein 
Befehl (im Disassembler-Listing sehen Sie Fragezeichen) 
oder ein Branch-Befehl (zum Beispiel ein BEQ, BCS- oder 
anderer Befehl, der zwar als Parameter die Zeropage- 
Adresse hat, dieser Parameter aber die Sprungweite anstelle 
einer Adreßangabe ist) oder ein Befehl, der auf eine Adresse 
zugreift, die zwar als LB den gleichen Wert wie die Zeropage- 
Adresse hat, aber ein HB ungleich 0. 

Ein Beispiel: Wenn Sie ab den gefundenen Adressen-1 
disassemblieren und nach Zugriffen auf $15 suchen, sind 


beispielsweise folgende Befehle richtig: 

LDA $15 

LDA $0015 (ist (fast) das gleiche wie LDA $15) 

STA $15 
JMP $0015 
BIT $15 
ADC $15 

Die folgenden Befehle greifen nicht auf $15 zu: 

LDA $4015 (HB ungleich 0) 

LDA #$15 (unmittelbar-adressiert) 

BNE xxxx ($15 war nur eine Angabe der Sprungweite) 

BIT $3015 (HB ungleich 0) 

CLD (CLD hat keinen Parameter, $15 wäre dann ein Befehls¬ 
code) 

Mit der Zeit bekommt man schon Gespür dafür, ob es sich 
um einen Zugriff auf eine Adresse handelt oder nicht. 

3. Prüfung, ob der Befehl durchlaufen wird 
Nun bleibt noch abzuwarten, ob der Befehl jemals abgear¬ 
beitet wird oder nicht. Wie man dies feststellt, haben wir 
schon bei der Suche nach den Opcodes der Befehle geklärt. 

Bei der Arbeit an Programmen, die illegale Opcodes in sich 
haben, ist natürlich jegliche Entscheidung erschwert. 

Als nächster Punkt soll die Suche nach Befehlen, die auf 
beliebige Zwei-Byte-Adressen ($0100 bis $FFFF) zugreifen, 
besprochen werden. 

Suchen noch Zugriffen auf 
beliebige Adressen 

Da wir schon wissen, wie man Zugriffe auf Zeropage- 
Adressen aufspürt, soll uns nun interessieren, wie man sol¬ 
che auf Adressen, die mit zwei Byte (LB und HB) darstellbar 
sind, sucht. 

Auöt, ■ des zusätzlichen (zu suchenden) Bytes der Adreß¬ 
angabe (statt ein Byte nun zwei) ändert sich nichts Grund¬ 
legendes. 

Während man bei der hexadezimalen Schreibweise zuerst 
das HB und dann erst das LB nennt ($4567; $45 = HB, $67 
= LB), legt der Computer diese Daten im Speicher genau 
umgekehrt ab (diese Darstellung ist für die CPU günstiger, 
der Grund dafür würde uns aber viel zu weit vom Thema 
abbringen und soll daher vernachlässigt werden): 

JMP $4567 wird abgelegt als $4C $67 $45 
Nun haben wir unser theoretisches Wissen vervollständigt 
und müssen es nur noch in die Praxis umsetzen. Dies ist das 
Verfahren zur Suche der Befehle, die auf eine mit zwei Byte 
(Low-Byte=LB, High-Byte=HB) dargestellte Adresse 
zugreifen: 

1. »H Anfangsadresse Endadresse LB HB«, 

im Beispiel bei der Suche nach Zugriffen auf $4567: 

»H Anfangsadresse Endadresse 67 45« 

2. Test der gefundenen Adresse 

Ob ab der gefundenen Adresse minus 1 (1 abziehen, da 
Adresse des LB im Speicher genannt wird, wir aber die 
Adresse des ein Byte vorher im Speicher stehenden Befehls¬ 
codes benötigen) ein »richtiger« Befehl steht, wird wie 
gehabt überprüft (»D Adresse-1« und so weiter, siehe »Vorge¬ 
hensweise bei Zeropage-Adressen«). 

3. Prüfung, ob Befehl durchlaufen wird 
Auch das haben wir bereits geklärt. 

An dieser Stelle ist ein wichtiger Hinweis zu machen, der 
vor allem den Einsteigern unter Ihnen zugedacht ist. 

Wenn Sie die Verzweigungs(englisch »branch«)-Befehle, 
die eine bestimmte Adresse anspringen, suchen, so können 
Sie mit den geschilderten Verfahren die entsprechenden 
Branches nicht ausfindig machen. Der Grund ist, daßeinBxx- 
(BEQ, BCS, ...)-Befehl folgendermaßen im Speicher abgelegt 
wird: 

Befehlscode Entfernung zum Sprungziel 
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Die Entfernung zum Sprungziel wird durch eine vorzei¬ 
chenbehaftete Binärzahl dargestellt. 

Sie können aus dem obigen Schema ersehen, daß das 
Sprungziel nicht direkt (wie etwa bei JMP, JSR, LDA, STA, 
INC, ...) im Speicher abgelegt ist (sondern nur die relative 
Sprungweite dahin) und somit ein H-Befehl nach LB und HB 
erfolglos bleibt. 

Wenn man nun die Verzweigungsbefehle über H suchen 
wollte, so müßte man für jede untersuchte Adresse die 
Sprungweite neu berechnen, und dies ist wirklich zu müh¬ 
sam. Es empfiehlt sich daher, den in Frage kommenden 
Bereich zu disassemblieren und durch eigene Suche die ent¬ 
sprechenden Befehle ausfindig zu machen. Dies ist aller¬ 
dings aufgrund einer wichtigen Tatsache nicht so schlimm: 

Verzweigungsbefehle haben eine stark begrenzte Sprung¬ 
weite! 

Die Sprungweite reicht nur 128 Byte nach hinten und 127 
nach vorn, so daß sich ein gerade 256 Byte großer Bereich 
ergibt, den man mit »D« betrachten muß. 

Suchen nach kompletten Befehlen 


Nun soll es für uns kein Problem mehr sein, auch nach ganzen 
Befehlen (zum Beispiel LDA $1245 oder JSR $FFD2) 
suchen zu lassen. Dazu brauchen wir nur zwei Schritte: 

1. Suche über H 

2. Test, ob Befehl durchlaufen wird 

Wie man den zweiten Punkt durcharbeitet, haben wir 
bereits besprochen. Nun interessiert uns naturgemäß der 
erste Punkt, aber auch dieser ist nicht völlig neu und wirklich 
keine große Schwierigkeit. 

Dazu wollen wir den bequemsten Weg wählen, denn die 
Umrechnung der mnemonischen Schreibweise in den Code 
ist zwar nötig (weil der H-Befehl nur nach Zahlen und nicht 
nach anderen Daten suchen kann), aber der A-Befehl kann 
uns dabei in hervorragender Weise unterstützen. 

Wir müssen nämlich nur »A 400 umzurechnender Befehl« 
eingeben und sofort den Assemblier-Modus verlassen (über 
< RETURN >). In der Zeile, in der wir den Befehl assembliert 
haben, sehen wir dann nach der Adresse (aber vor der 
mnemonischen Schreibweise) die hexadezimale Darstellung 
des Speicherformats. 

Wir haben dazu einfach in den 40-Zeichen-Bildschirm- 
speicher (ab $400) assembliert; dies ist bei Verwendung des 
80-Zeichen-Bildschirms unproblematisch (sofern nicht bei 
$400 ein Maschinenprogramm liegt), bei der Arbeit mit 40 
Zeichen pro Zeile sollte man folgendermaßen Vorgehen, 
damit wirklich nichts schiefgehen kann: 

- Bildschirm mit <SHIFT+CLR/HOME> löschen 

- einmal < RETURN > drücken 

Beim Assemblieren wird der erzeugte Code des Befehls 
(ein bis drei Byte) ab $400 abgelegt; deshalb erscheinen 
links oben am Bildschirm Zeichen. Damit diese Zeichen nicht 
ihrerseits durch die Neu-Anzeige nach dem Assemblieren 
gelöscht werden, ist es günstiger, die Eingabe nicht in der 
obersten Bildschirmzeile zu machen. 

Nun wollen wir als Beispiel nach dem Befehl »JSR $FFD2« 
im Bereich $4000 bis $4500 in Bank $F (#15) suchen. 

Der erste Schritt ist die Umwandlung des Befehls ins Spei¬ 
cherformat. Dazu geben wir folgende Zeile ein: 

A 400 JSR $FFD2 

Diese Eingabezeile wird sogleich vom Monitor überschrie¬ 
ben durch 

A 00400 20 D2 FF JSR $FFD2 
A 00403 (dahinter Cursor als Eingabe-Aufforderung) 

Nun drücken wir < RETURN >, um den Assemblier-Modus 
zu verlassen. Wir wissen nun, daß der Programmcode zu JSR 
$FFD2 folgendermaßen 20 D2 FF lautet. 


Nach diesen Codes können wir nun im Bereich $4000 bis 
$4500, den wir ja durchforsten wollen, suchen lassen: 

H F4000 F4500 20 D2 FF 

Um die gefundenen Befehle zu sehen (zum Beispiel um sie 
zu testen), brauchen wir jetzt keine Zahl subtrahieren, da die 
angegebenen Adressen schon stimmen; da wir auch den 
Befehlscode ($20 für JSR) suchen lassen, wird immer die 
Adresse angegeben, ab der $20 (der Befehlscode) steht. 

Dieser Abschnitt hat Ihnen hoffentlich gezeigt, wieviel man 
aus dem H-Befehl machen kann, wenn man nur das nötige 
Know-how hat - und das wird Ihnen hier nach und nach ver¬ 
mittelt. 

Analyse eines Maschinenprogramms 
mit TEDMON 


Maschinensprache lernt man auch dadurch, daß man fremde 
Maschinenprogramme analysiert und sich so bestimmte Pro¬ 
grammstrukturen aneignet. 

Hierbei ist der Monitor eine unentbehrliche Hilfe, wenn es 
darum geht, ein Programm zu durchleuchten. Dies kann man 
selbstredend nicht nur zu Lehrzwecken tun, sondern auch, 
um Änderungen an einem Programm durchzuführen oder es 
gar zu knacken (wenn man sich ganz gut auskennt). Auch die 
großen »Knacker« - die »Produzenten« unzähliger Raubko¬ 
pien - arbeiten mit Monitoren! 

Wir möchten Ihnen hier ein schrittweises Vorgehen, das 
Sie an einem Beispielprogramm Ihrer Wahl (es sollte nicht 
allzu lang sein) nachvollziehen können, vorstellen. Erforder¬ 
lich ist dazu zwar ein Drucker, aber für ernsthafte Anwendun¬ 
gen wie Maschinensprache ist ein solcher ohnehin erfor¬ 
derlich. 

Einig" Schritte unseres Verfahrens haben wir schon ange¬ 
sprochen oder gar ausführlich behandelt, so daß das Verfah¬ 
ren wirklich von jedem Maschinenprogrammierer, der dies 


liest, angewendet werden kann. 

Schritt 1: Bestimmung, wo Befehle und wo Tabellen stehen 
Als erstes sollte man sich vom Maschinenprogramm eine 
genaue Liste zusammenstellen, wo Maschinenroutinen ste¬ 
hen (also ausführbare Befehle, die auch durchlaufen werden) 
und wo nur Daten (zum Beispiel ASCII-Tabellen für Textaus¬ 
gabe) aufbewahrt sind. 

Eine solche Liste würde für den ROM-Bereich $4000 bis 
$4297 (natürlich in Bank 15 = $F, da es sich um ROM han¬ 
delt) etwa folgendermaßen aussehen: 

4000 bis 401F: Programmcode (Befehle) 

Undefinierte Bytes (»Abfall«) 
Programmcode 

ASCII-Tabelle (Einschaltmeldung) 
Programmcode 
numerische Tabelle 
Programmcode 
Wenn wir nun das Programm ausgeben wollen, wird der 
Programmcode disassembliert (mittels D), während die 
Daten mittels M gedumpt werden müssen (ein Disassembler- 
Listing würde kein sinnvolles Ergebnis bringen). 

Bei Programmcode könnte man übrigens noch prüfen, ob 
es sich um eine Unterroutine handelt; Unterroutinen erkennt 
man daran, daß ein RTS-Befehl am Ende steht. Falls ja, so 
sollte man hinter »Programmcode« in der Liste noch den Ver¬ 
merk »UP« (Unterprogramm) anbringen, denn dies kann hin¬ 
terher die Arbeit stark erleichtern. 

In unserem Beispiel - einem Teil des C128-ROMS - könnte 
man diesen Vermerk zum Beispiel bei den Adressen 4251 
bis 4266 oder 4279 bis 4297 anbringen. 

Mit diesem ersten Schritt, der durchaus zeitaufwendig sein 
kann, haben wir schon einen großen Teil geleistet. 

Schritt 2: Ausgabe des Listings auf dem Drucker 


4020 bis 4022: 
4023 bis 41BA: 
41BB bis 4250: 
4251 bis 4266: 
4267 bis 4278: 
4279 bis 4297: 
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Dieser zweite Schritt ist keine Herausforderung mehr, 
wenn man den ersten Schritt sorgfältig erledigt hat. Im Bei¬ 
spiel würden wir den ROM-Ausschnitt folgendermaßen aus¬ 
geben lassen: 

OPEN4,4:CMD4:MONITOR (Druckerausgabe) 

D F4000 F401F (Programmcode disassemblieren) 

M F4020 F4022 (Daten dumpen) 

D F4023 F41BA (Programmcode disassemblieren) 

M F41BB F4250 (Daten dumpen) 

D F4251 F4266 (Programmcode disassemblieren) 

M F4267 F4278 (Daten dumpen) 

D F4279 F4297 (Programmcode disassemblieren) 

X (Monitor verlassen) 

PRINT #4:CLOSE4 (Ein-/Ausgabe initialisieren) 

Natürlich kann man die Ausgabe auf den Bildschirm umlei¬ 
ten, aber dies ist nicht sinnvoll, da der Bildschirm nur wenige 
Zeilen Listing faßt. 

Außerdem ist ein Listing auf dem Papier viel leichter zu 
bearbeiten, da die Daten nicht nach dem Ausschalten des 
Computers verloren sind und man nicht dauernd auf den 
Monitor oder Fernseher sehen muß. 

Schritt 3: Erste Vermerke im Listing anbringen 

Wenn man das Listing (jetzt ist es ja auf dem Druckerpapier) 
übersichtlicher machen will, so sollte man vermerken, wo 
eine Routine endet. Dies ist ganz einfach aus den Maschi¬ 
nenbefehlen ersichtlich; nach einem JMP wird das Programm 
an einer ganz anderen Stelle fortgesetzt, nach einem BRK 
abgebrochen, nach einem RTS zum aufrufenden Programm 
zurückgesprungen oder nach einem RTI die Interrupt- 
Routine beendet. 

Nach folgenden Befehlen sollte man also mit Lineal und 
Kugelschreiber eine Linie als Trennungsmarke ziehen: 

JMP, RTS, BRK, RTI 

Unter JSR gehört natürlich keine Linie, da das Programm 
durch JSR in der Regel nur temporär an anderer Stelle fortge¬ 
setzt wird. 

Es mag vielleicht eine stumpfsinnige Arbeit sein, aber es 
lohnt sich wirklich, wenn man auf einen Blick sieht, wo ein Teil 
des Programms endet! 

Nach allen diesen Schritten haben wir schon ein beachtli¬ 
ches Ergebnis vor uns: ein übersichtliches Programmlisting 
auf Druckerpapier, das nur noch mit Kommentaren versehen 
werden muß - dieses Kommentieren ist zwar nicht ganz so 
einfach, aber mit ein wenig Systematik geht es schon viel 
leichter! 

Schritt 4: Hervorhebung von Verzweigungen mit Pfeilen 

Eine dem letzten Schritt ähnliche Arbeitserleichterung ist 
das Verdeutlichen von Verzweigungsbefehlen (BEQ, BNE, 
BCS, BCC, BVC,..) mit Hilfe von Pfeilen. 

Ein Pfeil dürfte für einen Sprung das deutlichste Symbol 
sein, das auf einen Blick alles aussagt. 

Am besten bringen Sie den Pfeil so an, daß er links von der 
mnemonischen Darstellung des Verzweigungsbefehls 
beginnt und die Spitze auf die mnemonische Darstellung des 
Befehls, der am Sprungziel steht und im Falle einer erfüllten 
Verzweigungsbedingung angesprungen wird. Dann ist sofort 
ersichtlich, was ein Verzweigungsbefehl bewirkt. 

Natürlich ist diese Reilmarkierung nicht bei allen Befehlen 
nötig und bei sehr weiten Verzweigungen auch nicht mehr 
möglich, aber viele Programmierer haben sicher schon die 
Erfahrung gemacht, daß ein mit Pfeilen versehenes Listing 
sehr viel einleuchtender ist. 

Schritt 5: Aufrufe von ROM-Routinen kommentieren 

Auch den (für diese Zwecke glücklichen) Umstand, daß 
fast kein Maschinenprogramm ohne ROM-Routine aus¬ 
kommt, können wir uns bei der Analyse eines fremden 
Maschinenprogramms zunutze machen. 

Wir benötigen nur genügend Informationen über die Ein¬ 
sprungadressen und ihre Bedeutung, und wenn wir einen 


JMP- oder JSR-Befehl ins ROM finden, so können wir hinter 
diesen Befehl einfach die Bedeutung der ROM-Routine 
schreiben. Oft stehen vor dem Befehl noch andere Befehle, 
die für die Parameterübergabe an die ROM-Routine zustän¬ 
dig sind, und auch diese Befehle können wir nun entschlei¬ 
ern. 

In der Regel kann man mit der Erklärung von ROM-Aufrufen 
einen großen Teil des Maschinenprogramms durchleuchten, 
so daß die restliche Analyse unverhältnismäßig stark erleich¬ 
tert ist. 

Grundvoraussetzung für diesen fünften Schritt ist, daß man 
eine Tabelle mit ROM-Einsprüngen zur Verfügung hat, um 
dann die ROM-Routinen-Aufrufe deuten zu können. Eine sol¬ 
che Tabelle braucht ohnehin jeder Maschinenprogrammierer. 
Schritt 6: Zusammengehörige Programmteile kennzeichnen 

Nun wollen wir noch feststellen, wo mehrere Befehle 
zusammen ein Modul ergeben, worunter wir Schleifen oder 
ähnliche Programmteile verstehen. 

Schleifen sind auch an den schon in Schritt vier angebrach¬ 
ten Verzweigungspfeilen leicht erkennbar, und solche 
zusammengehörige Programmteile wie etwa eine Schleife 
kennzeichnet man am besten mit einer geschweiften (oder 
auch eckigen, wenn Sie wollen...) Klammer, damit man hinter¬ 
her genau sieht, wo ein paar Befehle zusammengehören. 

Die geschweifte Klammer paßt am besten unmittelbar hin¬ 
ter die mnemonische Schreibweise der Befehle, vor den 
Mnemonics wurden ja in Schritt vier die Verzweigungspfeile 
angebracht. 

In unserem Beispiel - einem Teil des C128-ROMs - könnte 
man zum Beispiel die Befehle SF406A bis $F4073 als 
Schleife behandeln (sehen Sie doch einmal mit »D F406A 
F4073« nach) und hinter die mnemonische Schreibweise 
eine Klammer setzen. Wenn man dann ausgetüftelt hat, was 
dieSch'eife bewirkt, so schreibt man diese Erkenntnis hinter 
die Klammer. Es ist nämlich wenig sinnvoll, Grundstrukturen 
wie diese Verschiebeschleife Befehl für Befehl zu durch¬ 
leuchten; vernünftiger ist es, möglichst viele Befehle mit 
einer umfassenden Erklärung zu versehen, damit man sich 
nicht in unwesentlichen Einzelheiten wie den Befehlen, die 
den Schleifenablauf steuern, verliert. 

Schritt 7: Mit G-Befehl bestimmte Einsprünge testen 

Wie man mit dem G-Befehl und der Möglichkeit des 
Register-Änderns die einzelnen Routinen eines Programms 
testen kann, haben wir bereits behandelt. Dies ist vor allem 
bei der Analyse von Maschinenprogrammen sehr nützlich. 

Die vorgestellten sieben Schritte sind der Einstieg in die 
Analyse eines Programms; nun muß man noch nach und nach 
auswerten und die »Forschungsergebnisse« im Listing eintra¬ 
gen; in der Regel geht dies zwar langsam, aber die Analyse 
kostet nun einmal Zeit - viel Zeit. 

Dafür lernt man daraus unglaublich viel für die eigene 
Maschinenprogrammierung; zudem wird man bei dieser Ana¬ 
lyse immer sicherer und routinierter, so daß diese bald zügig 
vonstatten geht. 

Vergleich verschiedener Versionen 
von Maschinenprogrammen 


Dieser Abschnitt ist für diejenigen besonders interessant, die 
Maschinenroutinen mit dem A-Befehl des TEDMON erstel¬ 
len. Daß diese Form der Maschinenprogrammierung viel zu 
umständlich ist und die Anschaffung eines guten Assembler¬ 
pakets mehr als lohnend ist, braucht nicht weiter erwähnt zu 
werden. Für kleinere Routinen wird man aber doch manchmal 
den TEDMON einsetzen. 

Da man von einem Maschinenprogramm jede Zwischen¬ 
version speichert (zumindest sollte man dies tun, wenn man 
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nicht die Programmierarbeit leichtfertig Gefahren aussetzen 
will), möchte man auch einmal zwei Versionen vergleichen. 
Zwar kann man dies von Hand tun - die C128-Window- 
Technik mag ganz nützlich beim parallelen Disassemblieren 
sein aber bei längeren Programmen ist ein solches Vorge¬ 
hen eine Tortur. Es empfiehlt sich also, den C-Befehl des 
TEDMON einzusetzen (zumal dieser ja nur darauf wartet, uns 
zu helfen). 

Dazu möchten wir Ihnen wieder ein in Schritte eingeteiltes 
Verfahren vorstellen. 

I. aktuelle Version in Originalbereich laden 

Da man nach dem Vergleich an der aktuellen Version Weiter¬ 
arbeiten will, soll diese gleich in den Originalbereich kommen. 
Am besten lädt man über BLOAD"NAME" oder L "NAME", 
Gerät im Monitor, also jedesmal ohne Angabe einer Lade¬ 
adresse. Dann wird nämlich das Programm in den Bereich, aus 
dem heraus es gespeichert wurde, geladen. 

II. Vor-Version zum Vergleich in anderen Bereich laden 
Wenn der V-Befehl die Adresse, an der ein Unterschied auf- 

tritt, anzeigen würde (leider tut er das nicht), könnten wir jetzt 
mit V "ALTE VERSION ", Gerät, die neue mit der alten Version 
vergleichen lassen. Da dies wie gesagt nicht möglich ist, müs¬ 
sen wir die Version, mit der wir vergleichen wollen, in einen 
anderen Bereich laden (über relatives Laden): L "ALTE VER¬ 
SION ", Gerät, freier Bereich. 

Als freien Bereich sollte man einen Speicherbereich neh¬ 
men, in dem die Vergleichsversion vorübergehend liegen 
kann. 

III. Vergleich mit C durchführen lassen 

Nun können wir mit Hilfe des C-Befehls vergleichen lassen: 
C Anfang.neu Ende.neu Anfang.Vergleichsversion 
Dabei ist: 

Anfang.neu: Anfang des Originalbereichs, in 

den als Schritt I die neue Version 
geladen wurde 


100 REM "PROGRAMM VERSUCHSKANINCHEN" 
110 SCNCLR:PRINT"CC) 64'ER" 

120 REM **************************** 
130 C0L0R6,1 
140 END 

Listing 7. Das »Versuchskaninchen« 


Ende.neu: Ende dieses Originalbereichs 

(siehe oben) 

Anfang.Vergleichsversion: Anfangsadresse des Bereichs, in 

dem die Vergleichsversion liegt. 
Das ist der freie Bereich, in den wir 
die alte Version als Schritt II gela¬ 
den haben. 

Es werden bei Ausführung des C-Befehls dann alle die 
Adressen angezeigt, an denen sich die neue Version von der 
alten unterscheidet. Nun können Sie an der neuen Version 
weiterprogrammieren! 

Nun geht es an die Basic-Programme 


Ab jetzt sollen uns nur noch die Anwendungen des Monitors 
auf Basic-Programme interessieren, denn darüber findet man 
sonst nichts in der Literatur. 

Für Maschinenprogrammierer sei gesagt, daß sie die gege¬ 
benen Hinweise auch mitverfolgen sollten, da sie sowohl 
etwas über die Arbeitsweise ihres Computers erfahren als 
auch die Anwendungsbeispiele für Maschinenprogramme 
nutzen können: Viele Maschinenprogramme haben an ihrem 
Anfang eine Basic-Zeile, in der dann der SYS-Befehl steht, 
der erst das eigentliche Maschinenprogramm startet. 

Wie man dafür noch interessante Effekte einsetzen kann, 
erfahren Sie ganz am Ende des Kurses. 


MONITOR 

PC SR RC XR VR SP 
; FB000 00 00 00 00 FS 


Bild 24. Speicherausdruck des Programms »Versuchs¬ 
kaninchen« 
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MONITOR 

PC SR RC XR VR SP 
1 FB000 00 00 00 00 FS 


>01C00 

00 

24 

IC 

64 

00 

SF 

20 

22 

mmmmm 

>01C08 

50 

52 

4F 

47 

52 

41 

40 

40 

dSHKISttriiilfil 

>01C10 

20 

56 

45 

52 

53 

55 

43 

48 

«jaasäJMSI 

>01C13 

53 

4B 

41 

4E 

49 

4E 

43 

48 

ä3rsiüMSM:i 

>01C20 

45 

4E 

22 

00 

37 

IC 

6E 

00 

3ZUHMV5HI 

>01C28 

ES 

3R 

99 

22 

28 

43 

29 

20 

tmmtxmm 

>01C30 

36 

34 

27 

45 

52 

22 

00 

5R 

sEH=iaHii*a 

>01CSS 

IC 

78 

00 

SF 

20 

2R 

2R 

2R 

HOWHETXa 

>01C40 

2R 

2R 

2R 

2R 

2R 

2R 

2R 

2R 

üissssisa 

>01C48 

2R 

2fl 

2R 

2R 

2R 

2R 

2R 

2R 


>01C50 

2R 

2R 

2R 

2R 

2R 

2R 

2R 

2R 

ÜESEISSISa 

>01CSS 

2R 

00 

63 

IC 

82 

00 

E7 

36 

:MS5HWH51 

>01C60 

2C 

31 

00 

69 

IC 

SC 

00 

80 

HVEWmVI 

>01C68 

00 

00 

00 

FF 

FF 

FF 

FF 

FF 

wwrmrTüi 


Wir werden jetzt kennenlernen, wie ein Basic-Programm im 
Speicher abgelegt ist (das ist nicht kompliziert, aber sehr 
interessant, und wenn man es begriffen hat, kann man viel 
damit anfangen) und wollen dann unser Wissen zu Manipula¬ 
tionen an Basic-Programmen einsetzen. Rund um das Thema 
»Listschutz« wird alles besprochen werden - und noch ein 
bißchen mehr -, so daß Sie dann in der Lage sind, 

a) eigene Programme zu schützen 

b) Ihre Basic-Listings übersichtlich zu gestalten 

c) fremde Schutzvorrichtungen zu entfernen 

d) und - last but not least - den Monitor als Unterstützung 
beim Basic-Programmieren einzusetzen 

Die dazu erforderliche Theorie wollen wir, damit es etwas 
leichter geht, mit TEDMON erarbeiten. 

Unser Übungsprogramm, an dem wir von jetzt an dauernd 
üben wollen, finden Sie als Listing 7 abgedruckt - das Pro¬ 
gramm heißt »Versuchskaninchen«. 
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Zum Eintippen des Programms ist noch folgendes zu 
sagen: 

- Schalten Sie vorher den Computer aus und wieder ein 
oder lösen Sie zumindest einen Reset aus 

- Tippen Sie das Programm Zeichen für Zeichen genauso 
ab, wie es abgedruckt ist 

- In Zeile 130 sind es genau 28 Sternchen 

Das Programm belegt im Basic-Speicher (Bank 0, da in 
Bank 0 das Programm aufbewahrt wird) die Speicherplätze 
$1C00 bis S1C6A. Als Bild 24 sehen Sie das Programm »Ver¬ 
suchskaninchen« in 3 verschiedenen Darstellungsformen: 

1. Memory-Dump im 80-Zeichen-Modus (16 Byte pro Zeile) 

2. Memory-Dump im 40-Zeichen-Modus ( 8 Byte pro Zeile) 

3. als Listing wie über LIST erreichbar 

In den folgenden Erklärungen werden wir uns immer auf 
Punkt 1, das Memory-Dump, beziehen. 

Der Aufbau eines Basic-Programms 
im Speicher 


Beginnen wir gleich mit dem ersten Byte, dem Inhalt der Spei¬ 
cherzelle $1C00. Da wir mit »M 2D« zur Feststellung der 
Anfangsadresse des Basic-Programms im Speicher sehen 
können, daß das Basic-Programm im Speicher erst 1 Byte 
später abgelegt ist (nämlich ab $1C01), mag es zunächst ein 
wenig verwundern, wenn hier ab $1C00 (also 
Anfangsadresse-1) gedumpt wird. 

In dieser Anfangsadresse-1 muß ein $00-Byte enthalten 
sein, da sonst bei RUN oder NEW ein SYNTAX ERROR erfolgt 
(ändern Sie doch einmal im Dump das $00 in $40 oder $01 
oder irgendein Byte außer $00, und geben Sie nach X den 
Basic-Befehl RUN ein, dann sehen Sie den Effekt. Genauge¬ 
nommen hat dieses $00-Byte keine weitere Funktion, als 
eine Markierung zu sein. 

Diese Markierung haben wir schon beim Verschieben 
eines Basic-Programms mit dem T-Befehl angesprochen, wo 
wir diese mittels POKE auf 0 gesetzt hatten. 

Bevor wir nun fortfahren, sei noch klargestellt, daß der 
Interpreter bei der Speicherung von Integerwerten zwischen 
0 und 65535 das sogenannte »Low-High-Förmat« ver¬ 
wendet. 

Wie in einem Vektor oder Zeiger (wir erinnern uns an 
$2D/$2E als Zeiger auf den Beginn des Basic-Programms im 
Speicher) wird in der Speicherzelle, die eine niedrigere 
Adreßzahl hat, das Low-Byte, in der darauffolgenden das 
High-Byte abgelegt. Da im Speicher - insbesondere beim 
Dump - zuerst das Low-, und dann erst das High-Byte steht, 
spricht man vom »Low-High-Förmat«. 

Wie man mit diesem umgeht, wurde schon besprochen, 
und dies hier sollte nur eine kleine Auffrischung sein. Wir wol¬ 
len aber nun mit dem Thema »Aufbau eines Basic-Programms 
im Speicher« fortfahren. 

Die Linkpointer 


Bei $1C01 geht dann schon die Speicherung der ersten Pro¬ 
grammzeile - im Beispiel ist das Zeile 100 - los. 

Die zwei ersten Bytes einer Zeile sind der »Linkpointer«. 
»Linkpointer« kommt vom englischen »to link«, was übersetzt 
»verbinden« heißt. 

Die Linkpointer (so sagt man allgemein, und wir wollen die¬ 
ses Wort beibehalten) zeigen die Adresse an, ab der die 
nächste Basic-Zeile im Speicher beginnt - da bei der Spei¬ 
cherung am Anfang jeder Zeile der Linkpointer steht, zeigt ein 
Linkpointer auf den nächsten und so weiter. 

Der erste Linkpointer ist also $1C24, bei $1C24 steht ein 
Linkpointerauf $1C37, dort steht einer auf... Dies geht weiter 
bis $1C63, wo ein Linkpointer auf $1C69 zeigt. Und bei 


$1C69? Dort stehen zwei Null-Byte hintereinander als Link¬ 
pointer, woran der Basic-Interpreter erkennt, daß an dieser 
Stelle das Basic-Programm zu Ende ist. Die in dieser Dump- 
Zeile noch stehenden $FF-Bytes gehören schon nicht mehr 
zum Programm, und höchstwahrscheinlich stehen bei Ihnen 
dort andere Werte - zum Beispiel noch Überreste eines vor¬ 
her im Speicher befindlichen Programms. 

Die Hauptaufgabe der Linkpointer ist es, der LIST-Routine 
die Arbeit zu erleichtern. 

Die Zeilennummern 


Irgendwo muß sich der Computer auch die Zeilennummer 
merken. Und diese legt er - ebenfalls im Low-High-Format - 
unmittelbar hinter dem Linkpointer ab. Im Beispielprogramm 
stellen die Bytes »64 00« die Zeilennummer der ersten 
Basic-Zeile dar; wenn wir $0064 = $64 umrechnen lassen, 
sehen wir, daß es sich um Zeile 100 handelt - auch im Listing 
ist 100 die Nummer der ersten Zeile. 

Linkpointer und Zeilennummer sind der »Kopf« einer Basic- 
Zeile im Speicher. Darauf folgt dann das Speicherformat der 
Befehle, das uns auch noch interessieren wird. 

Die Token 


An früherer Stelle wurden die »Töken« schon einmal ange¬ 
sprochen. Jetzt wollen wir endlich wissen, worum es sich 
dabei handelt. 

Wenn Sie die ASCII-Darstellung im Dump einmal ansehen, 
finden Sie zwar den Text »PROGRAMM VERSUCHSKANIN¬ 
CHEN«, der in Zeile 100 auf den REM-Befehl folgt, wieder, 
aber nicht den REM-Befehl selbst. 

Wir wollen nun herausfinden, woher der Computer das 
REM nimmt. Dazu suchen wir ein Zeichen aus Zeile 100 nach 
dem anderen. Den Kopf der Zeile (Linkpointer und Zeilen¬ 
nummer) haben wir uns schon angesehen. Auf die Zeilen¬ 
nummer folgt im Listing ein Leerzeichen. Das der Zeilennum¬ 
mer folgende Byte im Speicher ist aber $SF, und nicht $20 
(ASCII-Code für Leerzeichen). Dies läßt sich ganz einfach 
erklären: Ohne besondere Tricks oder Hilfsprogramme wer¬ 
den alle Leerzeichen zwischen Zeilennummer und dem 
ersten Befehl vom Computer »geschluckt« (nicht im Speicher 
abgelegt). Deshalb ist es ja auch möglich, statt »100 REM« 
zum Beispiel »100 REM« oder nur »100REM« einzugeben - 
nach LIST wird immer »100 REM« ausgegeben werden. 

Der Grund dafür ist, daß kein einziges Leerzeichen zwi¬ 
schen Zeilennummer und Befehl (sonst natürlich schon) in 
den Speicher übernommen wird. Beim LISTen aber fügt die 
LIST-Routine automatisch nach der Zeilennummer genau ein 
Leerzeichen ein. 

Jetzt wissen wir zwar, warum trotz des geLISTeten Leerzei¬ 
chens auf die Zeilennummer im Speicher nicht der ASCII- 
Code eines Leerzeichens folgt, uns ist aber noch nicht klar, 
was das $8F-Byte bedeuten soll. Dieses Byte ist nämlich die 
Lösung unseres Ausgangsproblems (wie denn das REM 
gespeichert wird): $8F steht stellvertretend für REM. 

Der Vorteil von $8F gegenüber $52 $45 $4D (das sind die 
ASCII-Codes von REM) ist, daß es sich nur um ein Byte (statt 
um drei) handelt und der Computer dadurch viel schneller 
arbeiten kann. Außerdem verringert sich durch diese Codie¬ 
rung - statt eines Befehlswortes wird ein Byte gespeichert - 
als Nebeneffekt der Speicherplatzbedarf des Basic- 
Programms. 

Einen solchen Code für einen Basic-Befehl nennt man 
»Token«. Ein Token besteht in der Regel aus einem Byte, beim 
C128 haben manche Befehle sogar ein »erweitertes Token«, 
worauf wir noch zu sprechen kommen werden. 

Bei der Eingabe einer Basic-Zeile werden alle Befehlswör- 
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ter - sofern sie nicht nach einem REM oder in Anführungszei¬ 
chen stehen - sofort codiert und in Token umgewandelt. 
Diese Codierung nennt man »Token-Bildung« oder »Tokenisie- 
rung«. 

Ein-Byte-Token bestehen aus Werten kleiner $80. Zwei- 
Byte-Token (erweiterte Token) haben ein »Vor-Token«, näm¬ 
lich $CE oder $FE, das das Token einer bestimmten Gruppe 
von Befehlswörtern zuweist. Das diesem Vor-Token folgende 
Byte ist eine Zahl größer als $01, die zusammen mit dem Vor- 
Token eine genaue Bestimmung ermöglicht. 

Als Bild 25 finden Sie eine Tabelle der C128-Token. 

Was wird als ASCII-Code gespeichert? 

Nachdem wir nun wissen, wie Zeilennummern und 
Befehlswörter (wozu wir auch Funktionen und Operanden 
wie +, -, / und * zählen) im Speicher abgelegt werden, stellt 
sich die Frage, was mit den anderen Zeichen geschieht (zum 
Beispiel Leerzeichen, die nicht zwischen Zeilennummer und 
erstem Befehl stehen). Diese werden einfach im ASCII-Code 
abgelegt. Gleiches gilt für alle Zeichen, die entweder einem 
REM-Befehl folgen oder in Anführungszeichen stehen. 

Am Ende einer jeden Basic-Zeile steht ein $00-Byte. Diese 
Endmarkierung ist unbedingt erforderlich, da die wichtigsten 


Unterroutinen des Basic-Interpreters von diesem Umstand 
ausgehen. 

Nun ist uns auch klar, warum am Ende eines Basic- 
Programms 3 mal $00 steht: Einmal steht es als Endmarkie¬ 
rung der letzten Zeile und zweitens als letzter Linkpointer 
(also auch als Endmarkierung). 

Nachdem uns nun die wichtigsten Grundlagen bekannt 
sind, dürften Sie in der Lage sein, Byte für Byte das Memory- 
Dump (Bild 25) zu erläutern. Dabei können Sie sich durchaus 
auch auf das Basic-Listing stützen, denn Sie müssen nicht 
selbst die Token umrechnen können. Sie sollten aber erken¬ 
nen, ob es sich um Linkpointer, Zeilennummer, Befehlstoken 
oder ASCII-Code handelt. 

Wenn Sie ein tiefgreifendes Verständnis gewonnen haben, 
wird es für Sie keine Schwierigkeit mehr sein, Manipulationen 
am Programm durchzuführen. Damit werden sich die näch¬ 
sten Abschnitte beschäftigen. 

Speichern Sie spätestens jetzt das Programm »Versuchs¬ 
kaninchen«, denn nun wollen wir daran Manipulationen 
durchführen; zwar ist die Abtipparbeit gering, aber ein Verlust 
des Programms aufgrund eines vielleicht kleinen Fehlers 
wäre ärgerlich. 
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Bild 25. Die Token des C128 
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Da wir alles sofort ausprobieren wollen und Sie somit 
andauernd am Memory-Dump des »Versuchskaninchens« 
etwas ändern werden, vereinbaren wir vorher, wie wir Ihnen 
die Änderungen am Memory-Dump angeben. 

Nehmen wir ein Beispiel (nur fiktiv, nicht eingeben oder 
testen): 

>01C00 45 46 47 48 49 50 54 45 53 54... 

Dies bedeutet für Sie: 

- M 01C00 eingeben, sofern entsprechende Zeile noch 
nicht am Bildschirm ist 

- die nicht-unterstrichenen Bytes unverändert lassen 

- an unterstrichenen Stellen neue Werte eingeben (sech¬ 
stes bis achtes und zehntes Byte) 

- die Punkte »...« zeigen an, daß die dem letzten abgedruck¬ 
ten Wert folgenden Bytes nicht mehr geändert werden 
sollen 

Am einfachsten ist es, wenn Sie die angezeigte Zeile direkt 
eingeben (natürlich ohne die Punkte am Ende). Wie gesagt: 
Dieses Beispiel sollen Sie noch nicht ausführen. 

Ab jetzt sind die angezeigten Änderungen aber unbedingt 
einzugeben. Und nun viel Spaß mit den im folgenden verrate¬ 
nen Tips & Tricks, die Ihnen sicher Zusagen werden. 

Linkpointer manipulieren 


Wie wir wissen, zeigt immer der Linkpointer einer Zeile auf 
den Linkpointer der nächsten Zeile und so weiter, bis der 
Linkpointer aus zwei Null-Byte, der Endmarkierung, besteht. 

Die LIST-Routine benötigt diese Linkpointer, um zu wissen, 
ab welcher Adresse weitergeLISTet werden soll oder ob 
bereits das gesamte Programm geLISTet wurde. 

Etwas, worauf die LIST-Routine nicht vorbereitet ist, sind 
Linkpointer, die aufgrund einer Manipulation mit dem Monitor 
nur auf sich selbst zeigen. Wenn man so etwas eingibt, wird 
ein und dieselbe Zeile immer wieder geLISTet (Endlos- 
Listing). Setzen wir unsere raffinierte Idee gleich in die Tat um: 
>01C00 00 01^ IC... (das dritte Byte ist sicher schon IC) 

Wie Sie sehen, steht der Linkpointer bei S1C01. Wir haben 
ihn mit »01 IC«, also $1001, belegt. Um das verblüffende 
Ergebnis zu sehen, geben Sie doch einmal X und danach 
LIST ein: Die Zeile 100 (also die erste Zeile) wird immer wie¬ 
der geLISTet, die Zeilen 110-140 werden »verschluckt«. 

Geben Sie jetzt doch einmal »LIST 110-« ein. Der Computer 
- genauer gesagt: der Basic-Interpreter - verliert sich jetzt in 
einer Endlosschleife, denn bei der Suche nach einer 
bestimmten Zeile im Basic-Speicher stützt sich der Compu¬ 
ter auf die Linkpointer. Da er die Suche mit dem ersten Link¬ 
pointer beginnt, prüft er immer nur die erste Zeile (Zeile 100) 
darauf, ob sie die Zeilennummer 110 hat. Diese Bedingung ist 
natürlich nie erfüllt, und der Computer wird »an der Nase her¬ 
umgeführt«, bis man ihn mit <RUN/STOP+RESTORE> zur 
Vernunft bringt. Das gleiche Problem tritt auch bei GOTO, 
GOSUB, RUN Zeilennummer auf. Für den Fall, daß ein Pro¬ 
gramm (wie unser Beispielprogramm) überhaupt keinen sol¬ 
chen Befehl, der eine Zeilennummer als Argument hat, ver¬ 
wendet, wäre diese Linkpointer-Manipulation eine gute 
Listschutz-Möglichkeit, wenn nicht... Ja, wie Sie der Bemer¬ 
kung »wenn nicht« entnehmen können, steht dem ein 
unüberwindbares Hindernis im Weg: Wir können zwar im 
Speicher solche Manipulationen durchführen, aber wenn der 
Listschutz wirksam sein soll, so muß er auch nach dem Spei¬ 
chern und einem Neuladen bestehen. 

Wenn auch beim Speichern die manipulierten Linkpointer 
mitgeSAVEt werden, so wird nach dem Laden mit LOAD oder 
DLOAD automatisch eine Linkpointer-Neuberechnung 
durchgeführt, die die Linkpointer wieder in den Normalzu¬ 
stand versetzt - und der schöne Listschutz ist dahin. 

Diese Linkpointer-Neuberechnung kann man übrigens 



auch über den Befehl »BANK15:SYS20303« ausführen las¬ 
sen. Bei 20303 in Bank 15 steht nämlich die Routine des 
Basic-Interpreters zur Neuberechnung. 

Unsere Manipulationen dienen also zunächst einmal nur 
der Demonstration; wirklich als Listschutz verwendbare Ver¬ 
fahren werden Ihnen selbstverständlich auch vorgestellt wer¬ 
den, und zwar mehr als genug! 

Es geht zunächst einmal nur darum, daß Sie Praxis im 
Umgang mit dem Monitor bekommen und daß Sie das Prinzip 
verstehen. 

Der genannte Befehl »BANK15:SYS20303« eignet sich 
aber gut, wenn man ohne Speichern und nochmaliges Laden 
die Versuchsmanipulationen beheben möchte. 

Geben Sie deshalb jetzt diesen Befehl ein, damit das Pro¬ 
gramm wieder im Ausgangszustand ist und wir eine weitere 
- ähnliche - Manipulation durchführen können, die mehr ein 
interessanter Effekt als ein Listschutz ist. 

Wir wollen dazu den letzten Linkpointerauf den Programm¬ 
beginn ($1001) stellen, damit immer wieder das Programm 
geLISTet wird - nach dem LISTen der letzten Zeile soll wieder 
die erste ausgegeben werden und so weiter. 

Verfolgen wir also die Linkpointer: 
der erste (bei $1001) zeigt auf $1024, 

$1024 zeigt auf $1037, 

$1037 zeigt auf $1C5A, 

$1C5A zeigt auf $1063, 

$1063 zeigt auf $1069, 

bei $1069 steht die Linkpointer-Endmarkierung: 00 00 

Der letzte wirkliche Linkpointer (also abgesehen von der 
Endmarkierung) istfolglich $1063. Diesen stellen wir nun auf 
den Anfang des Programms: 

>01060 2C 31 00 01 IC 

Das zweite zu ändernde Byte ist ohnehin schon mit $1C 
belegt. 

Geben Sie nun LIST ein, so wird das Programm ununterbro¬ 
chen gelistet (diesmal alle Zeilen), ein Abbruch ist nur mit 
< RUN/STOP > möglich. Wenn Sie nun eine (nicht existente) 
Zeilennummer 140 LISTen oder anspringen wollen, so befin¬ 
det sich der Computer wieder in einer Endlosschleife, denn 
er ist nicht in der Lage, das Programmende zu erkennen und 
sucht vergeblich weiter. Aber - wie die Eingabe 
»BANK15:SYS20303« zeigt - ist auch dieser Spaß nicht 
»wetterfest«: nach dem Laden eines derart behandelten Pro¬ 
gramms geht der Effekt verloren. 

Als letzte Linkpointer-Manipulation wollen wir bewirken, 
daß Zeilen für LIST nicht vorhanden sind, aber trotzdem abge¬ 
arbeitet werden. Leider ist auch eine solche Änderung nicht 
gerade dauerhaft, aber zur Demonstration ist das eine nette 
Spielerei. 

Sehen wir uns noch einmal die »Marschroute« der Link¬ 
pointer an: 

1C01-1C24-1C37-1C5A-1C63-Endstation bei 1069 

Wir wollen nun die Linkpointer etwas umstellen: 
1C01-1C63-Endstation bei 1069 

Dazu müssen wir einfach den Linkpointer 1C01 auf 1C63 
stellen, alles weitere ergibt sich daraus von selbst: 

>01001 63 IC... 

Nach diesen Manipulationen, die durch Speichern und 
Neuladen zerstört werden und somit kein Schutz sind, wollen 
wir nun auch Änderungen durchführen, die dauerhafter sind. 

Zeilennummem manipulieren 


Im Gegensatz zu den Linkpointern werden die Zeilennum¬ 
mern nicht nach jedem Ladevorgang neu berechnet, sondern 
bleiben unverändert. Somit sind Manipulationen an den 
Zeilennummern wesentlich dauerhafter als Linkpointer-Mani- 
pulationen. 
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Wie wir wissen, darf bei der Eingabe einer Zeilennummer 
die Zeilennummer nicht größer als 63999 (= $F9FF) sein. 
Da die Zeilennummer im Speicher als Zwei-Byte-Integerzahl 
im Low-High-Format abgelegt wird, wären eigentlich Zeilen¬ 
nummern bis (2 ,e )-1 = $FFFF = 65535 möglich. Warum 
der Interpreter hier engere Grenzen setzt als nötig ist nicht 
bekannt. 

Was dieses Thema für uns so interessant macht, ist die Tat¬ 
sache, daß Zeilen mit Zeilennummern über 63999 nicht 
angesprungen und vor allem nicht über Eingabe von Zeilen¬ 
nummer und < RETURN > oder »DEL Zeilennummer« 
gelöscht werden können. 

Wenn wir also Zeilen zur Verfügung haben, die nicht ange¬ 
sprungen werden (zum Beispiel Einzeiler-Programme), kön¬ 
nen wir mit dem Monitor auch Zeilennummern bis 65535 
erzeugen. Nehmen wir wieder unser Beispielprogramm und 
probieren es gleich aus: 

>01C03 E8 FD... 

Damit haben wir die Zeilennummer der ersten Zeile 
(ursprünglich 100) auf $FDE8 = 65000 gesetzt. Nun setzen 
wir auch noch die anderen Zeilennummern neu: 

>01C26 F2 FD... 

>01C39 FC FD... 

>01C5C 06 FE... 

>01C65 10 FE... 

Nach diesen Änderungen hat das Programm die Zeilen¬ 
nummern 65000 bis 65040. Versuchen Sie doch einmal, 
eine Zeile zu löschen (aber nicht mit NEW): 

65000 < RETURN > ergibt einen »7SYNTAX ERROR«. 

Bei den anderen Zeilennummern ist dies, weil alle größer 
als 63999 sind, auch nicht anders. 

Da die Zeilennummern erhalten bleiben, können Sie das 
Programm in diesem Zustand speichern, und nach dem 
Laden wird es immer noch die überdimensionalen Zeilennum¬ 
mern haben. 

Auch ein »BANK15:SYS20303« (Linkpointer-Neuberech¬ 
nung) ändert nichts daran. 

Der große Nachteil von derartig manipulierten Programmen 
ist, daß das Ändern einer Zeile mit unerlaubter Zeilennummer 
nicht so leicht möglich ist (mit dem Basic-Editor geht es 
jedenfalls nicht); dies kann aber, wenn man sein Programm 
gegen allzu leichte Eingriffe schützen will, ein Vorteil sein. 

Besonders interessant sind überdimensionale Zeilennum¬ 
mern für Einzeiler, die unter Umständen nur die Basic-Start- 
Zeile eines Maschinenprogramms sind. 

Eine andere Möglichkeit der Manipulation von Zeilennum¬ 
mern ergibt sich daraus, daß man eine Zeilennummer als Zei¬ 
lennummer für mehrere Zeilen verwendet. Damit kann man 
ein Listing ziemlich chaotisch gestalten. Natürlich kann diese 
Mehrfach-Zeilennummer auch noch zusätzlich überdimen¬ 
sional sein. Damit Sie auch dies gleich in der Praxis einmal 
anwenden können, wollen wir in unserem Beispielprogramm 
jeder Zeile die Zeilennummer 65535 geben. 

Dazu sind folgende Änderungen erforderlich: 

>01003 FF FF 
>01026 FF FF 
>01039 FF FF 
>01050 FF FF 
>01065 FF FF 

Es ist selbstverständlich auch möglich, nur Teilen eines 
Programms gleiche Zeilennummern zu geben; achten sollte 
man nur darauf, daß an eine mehrfach verwendete Zeilen¬ 
nummer kein Sprung (GOTO, GOSUB, RUN) erfolgt. Wenn 
man sich daran hält, kann eigentlich nichts passieren. 

Nun wollen wir zum Abschluß dieses Abschnitts noch 
Anwendungen des H-Befehls besprechen, von denen die 
eine bei der Manipulation eines Basic-Programms mit dem 
Monitor nützlich ist, die andere bei der Basic- 
Programmierung. 


a) Suche nach einer bekannten Zeile im Speicher 

Oft kommt man in die Lage, daß man eine bestimmte Zeile, 
deren Zeilennummer man kennt, im Speicher suchen 
möchte, um sie dann mit dem Monitor zu bearbeiten; insbe¬ 
sondere in den folgenden Abschnitten werden solche 
Anwendungsfälle auftreten. 

Die gezielte Suche nach dieser Zeile ist für uns, da wir ja 
den Aufbau einer Basic-Zeile im Speicher kennen, keine 
Schwierigkeit mehr. 

Wir müssen nur die Zeilennummer ins hexadezimale Low- 
High-Format umrechnen und danach gezielt suchen lassen. 

Auch an dieser Stelle möchten wir Ihnen ein schrittweises 
Verfahren vorschlagen: 

I. Umwandlung der dezimalen Zeilennummer ins hexadezi¬ 
male Zahlensystem 

Nehmen wir als Beispiel die Zeile 4000 (dezimal). Also 
müßten wir »+4000« eingeben, um das hexadezimale 
Ergebnis ($0FA0) zu erhalten. 

II. Umwandlung der hexadezimalen Zahl ins Low-High- 
Format 

Die beiden ersten Stellen ergeben das HB, die beiden letz¬ 
ten das LB. Im Beispiel: LB=$A0, HB=$0F. Das Low-High- 
Format ist folglich »AO OF«. 

III. Suche nach Low-High-Format der Zeilennummer 

Nun ist noch der Bereich, in dem das Basic-Programm liegt, 

zu durchsuchen. Die Anfangs- und Endadresse kann man, 
wenn man diese Parameter noch nicht kennt, mit Hilfe des M- 
Befehls ermitteln (siehe Abschnitt über den M-Befehl). 

Nehmen wir an, die Anfangsadresse ist $1001 (Normalein¬ 
stellung) und die Endadresse $789F. Der Suchbefehl lautet 
dann »H 1C01 789F AO OF«. 

IV. Auswertung des Suchergebnisses 

In den meisten Fällen wird man wohl nur eine Adresse als 
Ergebr s erhalten (nehmen wir als Beispiel S3A61). Von die¬ 
ser Adresse, die die Adresse der Zeilennummer im Speicher 
ist, kann man dann alle zur gesuchten Zeile benötigten Adres¬ 
sen ausrechnen: 

Die Linkpointer stehen bei Adresse-2 = $3A61-2 = 
$3A5F, die Tokens und ASCII-Codes der Zeile bei 
Adresse+2 = S3A61+2 = $3A63. 

Wenn man mehrere Adressen als Ergebnis der Suche über 
den H-Befehl erhält, so muß man mit »M Adresse« prüfen, ob 
ab Adresse+2 die Codes der richtigen Basic-Zeile stehen. 
Dieses Prüfen von Hand ist nur selten nötig, und man erhält 
in den seltensten Fällen mehrere Adressen, die zu testen 
sind. Wenn dies dennoch der Fall ist, so kann man sich das 
Prüfen dadurch erleichtern, daß man zwischenzeitlich den 
Monitor verläßt, »LIST Zeilennummer« eingibt und dann im 
Monitor direkt mit der - noch am Bildschirm stehenden - 
geLISTeten Zeile vergleicht. So findet man die Adresse einer 
Programmzeile im Speicher ziemlich schnell. 

b) Suche nach einer Stelle im Programm 

Es gibt aber auch eine etwas andere Suche nach einer 
Stelle im Programm, für die es beim ansonsten überzeugen¬ 
den Basic 7.0 keinen Befehl gibt: die Suche nach Programm¬ 
zeilen, in denen bestimmte Stellen (zum Beispiel ein Text) 
Vorkommen. 

Dieser Anwendungsfall ist beim Basic-Programmieren sehr 
häufig, vor allem dann, wenn man Programme ansehen oder 
gar ändern will. 

Auch für diesen Fall können wir auf den H-Befehl des TED- 
MON zurückgreifen, wobei man ungefähr folgendermaßen 
vorgeht: 

I. Suche nach Stelle im Basic-Speicher 

Hierbei ist zu beachten, daß Basic-Befehlswörter zu Token 
werden. Wie man Anfangs- und Endadresse des Basic-Pro¬ 
gramms im Speicher ermittelt, wissen wir bereits. 

II. gefundene Stellen mit M ansehen 

Der Computer gibt nach dem H-Befehl alle die Stellen aus, 
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an denen die Stelle steht. Da wir zur weiteren Bearbeitung 
über LIST und den Basic-Editor aber die Zeilennummer - 
diese steht im Speicher vor dem Programmtext - benötigen, 
lassen wir das Memory-Dump einfach bis zu 250 Byte früher 
als die über H gefundene Adresse beginnen. Wenn wir also 
SF3457 erhalten, dumpen wir »M F335A«. 

III. Zeilennummer suchen 

Nun suchen wir das letzte Null-Byte (Endmarkierung einer 
Basic-Zeile) vor der (über H) ausgegebenen Adresse. Diese 
Markierung ist die Endmarkierung der letzten Basic-Zeile vor 
der Zeile, in der der gesuchte Text steht. Auf das Null-Byte 
folgt dann ein für diese Suchzwecke uninteressanter Link¬ 
pointer, hinter dem schließlich die Zeilennummer im Low- 
High-Format steht. Mit Hilfe des $-Befehls kann man diese 
Zeilennummer ins dezimale Format umwandeln lassen, und 
einer weiteren Bearbeitung der Zeile über LIST und den 
Basic-Editor steht nun nichts mehr im Wege. 

ASCII-Codes in REM-Zeilen unterbringen 


Als Vorübung für dieses Thema, das unser letztes sein wird 
(es erstreckt sich über diesen und die folgenden zwei 
Abschnitte), sollten Sie den Abschnitt über die ASCII-Codes 
gelesen haben. 

Wir wollen nun daran gehen, bestimmte ASCII-Codes in ein 
Basic-Programm einzubauen (unser Beispielprogramm Ver¬ 
suchskaninchen verwenden wir weiter), um Chaos oder aber 
Ordnung in ein Basic-Listing zu bringen. Wir werden sowohl 
das Listing übersichtlicher gestalten als auch Listschutzver¬ 
fahren anwenden. 

Wir werden mit dem Monitor (vor allem dem M-Befehl) in 
REM-Zeilen - damit das Programm weiterhin lauffähig bleibt 
- ASCII-Codes schreiben, die dann beim LISTen ausgegeben 
werden und somit zur Ausführung kommen. 

Damit Sie - ohne große Vorkenntnisse, die wir natürlich 
auch erarbeiten wollen - einen Abglanz der uns erwartenden 
Möglichkeiten sehen können, geben Sie bitte folgenden 
Befehl an den Monitor ein: * 

>01C06 13 12 

$13 (# 19) ist der ASCII-Code für HOME, $12 (# 18) der für 
RVS ON. 

Wenn Sie nun LISTen (geben Sie einfach nach X den Basic- 
Befehl LIST ein), so erscheint der Inhalt der ersten REM-Zeile 
(Zeile 10) unabhängig von der Startposition des Cursors beim 
Listen links oben am Bildschirm (also von der HOME-Position 
an). Dies wird natürlich durch den über > eingebauten Code 
$13 ausgeiöst. 

Außerdem erscheint der Text »PROGRAMM VERSUCHS¬ 
KANINCHEN« nun in inverser Darstellung, was durch den 
Code $12 verursacht wird. 

Dies sollte nur ein kleiner Einstieg sein; probieren Sie doch 
einmal die folgenden Eingaben aus, wobei Sie vor jeder 
Änderung das Programm noch einmal laden sollten (damit die 
alten Manipulationen entfernt werden): 

>1C06 1B 58 
> 1C06 07 
>1C06 OD 
>1C06 1F 
>1C06 05 
>1C06 1B4A 

Bei der ersten Eingabe könnte vielleicht der Eindruck ent¬ 
stehen, der Computer würde zum Abstürzen gebracht; dies 
ist jedoch nicht so: es wird durch die Steuerzeichen 1B 58 
nur bewirkt, daß die Anzeige vom 40- auf den 80-Zeichen- 
Bildschirm wechselt oder umgekehrt. 

Bei den Befehlen, bei denen auf 1C06 nur ein Byte folgt, 
wird im übrigen das Leerzeichen vor »PROGRAMM VER¬ 
SUCHSKANINCHEN« überschrieben, weshalb es von da an 


nicht mehr existiert und als unmittelbare Folge nicht gelistet 
wird (statt dessen unser Steuerzeichen). 

Auch wenn Sie nun schon ein paar weitere Beispielmanipu¬ 
lationen durchgeführt haben: das ist nur die Spitze des Eis¬ 
bergs. 

Vom Rest trennt uns aber nicht mehr viel, denn der Monitor 
ist mittlerweile für uns ein hilfsbereiter Freund geworden (hät¬ 
ten Sie das in Ihrer Anfangszeit mit dem Monitor gedacht?) 
und wird uns keine Schwierigkeiten machen. Wir müssen nur 
noch den Basic-Interpreter überlisten, und um es gleich zu 
sagen: das ist nicht schwer. 

Einen Großteil wissen wir schon: Uns ist bekannt, wie ein 
Basic-Programm im Speicher abgelegt wird. Sehr interessant 
ist dabei die Tatsache, daß Texte nach REM-Befehlen direkt 
im ASCII-Code abgelegt werden. 

Nun müssen wir noch wissen, wie der LIST-Befehl den 
Interpreter-Code (Token) des Basic-Programms in den leicht¬ 
verständlichen Klartext umwandelt. Dazu geht er folgender¬ 
maßen vor: 

- Zeilennummern werden ausgegeben, Linkpointer igno¬ 
riert (für den Basic-Programmierer sind diese uninteres¬ 
sant und müssen nicht ausgegeben werden). 

- Token werden daran erkannt, daß sie größere Werte als 
$7F sind und nicht zwischen zwei Anführungszeichen 
stehen (sonst wären Werte größer als $7F als ASCII- 
Codes für Grafikzeichen etc. unbrauchbar); solche als 
Token erkannten Werte werden mit Hilfe einer Tabelle im 
ROM, in der die Klartexte der Befehle aufbewahrt sind, 
umgewandelt. Diese Tabelle haben wir uns bereits mit dem 
M-Befehl angesehen (M F4417). 

- Nicht-Token und alle Codes, die in Anführungszeichen ste¬ 
hen, werden unmittelbar wie über »PRINT CHR$(Code);« 
ausgegeben - also ohne vorheriges Codieren oder 
Umw-'fi ideln j n einen dazugehörigen Klartext, wie dies 
etwa bei Token erfolgt. 

- Am Ende einer Zeile, welche anhand der Endmarkierung 
$00 erkannt wird, wird das Steuerzeichen RETURN 
(ASCII-Code $0D= #13) ausgegeben. In Basic ist dies 
mit »PRINT CHR$(13);« oder einfach »PRINT« (ohne Para¬ 
meter) möglich. 

Aufgrund der Token ergibt sich nun ein kleines Problem: 
Steuerzeichen mit Codes über $7F - wie zum Beispiel $93, 
den Code für CLR/HOME, können wir zwar einbauen - zum 
Beispiel über > 1C06 93, aber diese werden nicht einfach an 
die Ausgaberoutine des Betriebssystems gesendet und 
dann ausgeführt, sondern als Token behandelt, weshalb 
anstelle des ursprünglich vorgesehenen Steuerzeichens 
dann ein Basic-Befehl erscheint (probieren Sie es aus: 
>1C06 93 schreibt zwar den ASCII-Code des Steuerzei¬ 
chens für Bildschirm-Löschen unmittelbar hinter den REM- 
Befehl, beim Listen erscheint jedoch ein Basic-Befehl). 

Der Einfachheit halber werden wir fürs erste nur Codes, die 
kleiner als $80 sind, einbauen; für die anderen finden wir 
auch noch eine Lösung, wenn wir schon mehr Übung gewon¬ 
nen haben. 

Das Steuerzeichen RETURN 


Eine kleine Abhandlung über das ungemein wichtige Steuer¬ 
zeichen RETURN wurde bis zu dieser Stelle aufgeschoben, 
aber jetzt wird es Zeit, daß wir uns über dieses Gedanken 
machen. 

RETURN werden wir fortan als CR bezeichnen. CR ist die 
Abkürzung für »carriage return«, was man mit »Wagenrück¬ 
lauf« übersetzt. 

CR werden wir deshalb sagen, weil RETURN zu Verwechs¬ 
lungen mit dem Basic-Befehl gleichen Namens führen kann 
- auch wenn der Sinnzusammenhang dem Fortgeschrittenen 
eine klare Unterscheidung ermöglichen dürfte. 
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Ein CR ($0D= #13) bewirkt bei der Ausgabe - unabhängig 
von jedem Ausgabe-Modus - folgendes: 

- Es wird auf den Normal-Modus (siehe Eingabemodi des 
Betriebssystems) zurückgeschaltet. 

- Der Cursor springt an den Anfang der nächsten Zeile. 

- Der RVS-Modus wird ausgeschaltet. 

Insbesondere der erste Punkt ist sehr wichtig. Dem CR 

ähnlich ist der Code $8D = #141, der per Tastatur über 
<SHIFT+RETURN > erreicht wird. Dieser entspricht in den 
genannten Wirkungen exakt dem CR-Code, gilt aber nicht als 
Abschluß einer Eingabe. Eine vom Basic-Befehl INPUT gefor¬ 
derte Eingabe wird nur durch Drücken von < RETURN > 
(also CR) abgeschlossen, nicht über < SHIFT+ RETURN >. 

Für den Anfang haben wir jetzt die theoretischen Grundla¬ 
gen erarbeitet; wir wollen nun in der Praxis Manipulationen 
durchführen, um Steuerzeichen in unser Beispielprogramm 
einzubauen. Hierbei verwenden wir zunächst nur die beiden 
REM-Zeilen, wobei in der ersten (Zeile 100) der Text erhalten 
bleiben soll. 

Die Änderungen werden wir so angeben, daß sie nach und 
nach durchgeführt werden und eine Manipulation - sofern 
dies möglich ist - keine vorhergehende Manipulation rück¬ 
gängig macht. Falls dem nicht so ist, werden wir extra darauf 
hinweisen. 

Wir werden es Ihnen ebenfalls mitteilen, wenn unsere 
ersten Versuche fertig sind; das Programm befindet sich 
dann im manipulierten Zustand, und Sie können es durchaus 
einmal speichern. 

Auf die Liste der Steuerzeichen des CI28 aus dem 
Abschnitt über die ASCII-Codes sei noch einmal hingewie¬ 
sen. Nun aber zu den Manipulationen am Basic-Programm. 

CR und/oder LF 

CR haben wir in diesem Abschnitt schon besprochen. Neu ist 
jedoch die Abkürzung »LF«. LF steht für »line feed«, auf 
deutsch »Zeilenvorschub«. Benutzer eines Druckers dürften 
dieses Steuerzeichen vielleicht schon kennen. Am Bild¬ 
schirm entspricht es der Taste <CRSR DOWN>. 

Während CR in jedem Modus funktioniert und gewisse Ein¬ 
stellungen wie das Umschalten in den Normal-Modus 
(Anführungszeichen-Modus aus) vornimmt, tut dies der LF- 
Code (zu erreichen über die <LINE FEED >-Taste der 
C128-Tastatur oder < CTRL+J >) nicht. Wie gesagt, er ent¬ 
spricht eigentlich der Bewegung CRSR DOWN. 

Wir wollen nun mit Hilfe des CR-Codes erreichen, daß die 
Zeile 

100 REM "PROGRAMM VERSUCHSKANINCHEN" 
fortan so geLISTet wird: 

100 REM 

"PROGRAMM VERSUCHSKANINCHEN" 

Dazu ändern wir das Leerzeichen zwischen REM und 
»PROGRAMM...« auf den CR-Code: 

>01C00 00 24 IC 64 00 8F OD 22 50 52 4F 47... 

Sie können auch der Einfachheit halber > 1C06 OD einge¬ 
ben. 

Verlassen Sie den Monitor mit X und geben Sie LIST ein, so 
können Sie das Ergebnis sehen. 

Dabei wollen wir es jedoch nicht belassen. Ein schönerer 
Effekt ist es, wenn folgende Ausgabe auf LIST erscheint: 
100 REM 

"PROGRAMM VERSUCHSKANINCHEN" 

Wie Sie sicher erkennen können, müssen wir dazu den 
LF-Code ($0A= #10) verwenden: 

>01C00 00 24 IC 64 00 8F OA 22 50 52 4F 47... 
oder einfach >1C06 OA eingeben. Dadurch wird der CR- 
Code mit dem LF-Code überschrieben. 

Sowohl diese Änderung als auch alle noch folgenden Mani¬ 
pulationen sollten Sie, um Erfahrung zu gewinnen, gleich 


über X und LIST ansehen, und danach wieder mit MONITOR 
(<SHIFT+F7>) in den Monitor zurückspringen. 

Es stehen zwar 16 Farbcodes zur Verfügung, aber leider 
sind nur 4 davon auf ASCII-Codes gelegt, die kleiner als $80 
sind: 

weiß ist $05 (#05) 
rot ist $1C (#28) 
grün ist$1E(#30) 
blau ist $1F (#31) 

Wir wollen nun Farbe ins Spiel - sprich: in das Listing - 
bringen. 

Als Beispielanwendung soll nach dem LISTen von »100 
REM« die aktuelle Zeichenfarbe auf blau (ASCII-Code: 
$1F= #31)geschaltetwerden. Dazu muß in Basic CHR$(31) 
ausgegeben werden, in unserem Fall - dem Basic-Programm 
- muß der ASCII-Code des Farbsteuerzeichens in der REM- 
Anweisung stehen, damit er dann ausgegeben wird und sich 
die Zeichenfarbe ändert: 

>01C00 00 24 IC 64 00 8F OA 1F 50 52 4F 47... 
oder einfach >1C07 1F eingeben. 

Wir opfern also dem Farbsteuerzeichen das nicht so ele¬ 
mentar wichtige, erste Anführungszeichen. 

Nachdem wir das erste Anführungszeichen geopfert 
haben, ist das zweite eigentlich auch überflüssig. Denkbar 
wäre unter anderem, dies mit einem CR oder LF zu über¬ 
schreiben. Wir wollen jedoch, daß nach der Kommentarzeile 
der Text weiß ausgegeben wird. 

Sicher haben Sie schon erraten, was dazu getan werden 
muß: der Code des zweiten Anführungszeichens, der im 
Speicher bei $1C22 steht, muß mit dem Steuerzeichen über¬ 
schrieben werden, welches die Zeichenfarbe auf weiß stellt: 
>01C20 45 4E 05 00 37 IC 6E 00... 
oder einfach >1C22 05 eingeben. 

Sih r, innen auch anstelle unserer Beispielfarben weiß (das 
war der $05-Code) und blau ($1F) andere Farbsteuerzei¬ 
chen - die ASCII-Codes zur Einstellung der zunächst mögli¬ 
chen Farben wurden Ihnen bereits angegeben - ausprobie¬ 
ren. 

Cursor in Home-Position bringen 


Während die Farben - sofern nicht gerade die Zeichenfarbe 
den gleichen Wert wie die aktuelle Hintergrundfarbe erhält - 
eher zur Übersichtlichkeit eines Listings beitragen als zu 
chaotischen Ausgaben, die Unbefugten den Zutritt zum Pro¬ 
gramm verwehren oder zumindest erschweren sollen, kann 
man manche Codes ganz gut einsetzen, um Verwirrung im 
Listing zu stiften. 

Wie Sie wissen, bringt die HOME-Taste den Cursor in die 
Home-Position, das heißt die linke obere Ecke des Bild¬ 
schirms beziehungsweise Textfensters (falls man nur einmal 
auf <HOME> drückt und man überhaupt auf die Window- 
Technik zurückgreift). 

Der Cursor bestimmt immer die Stelle, an die die nächste 
Bildschirmausgabe erfolgt. Wenn wir ihn also wie über die 
< HOME > -Taste in die linke obere Ecke wandern lassen, so 
wird das nächste Zeichen nach HOME, das geLISTet wird, 
links oben ausgegeben. Das Interessante daran ist, daß alle 
Texte, die an den betreffenden Stellen stehen, überschrieben 
werden, die Stellen in einer Zeile, die nicht überschrieben 
werden, aber nicht gelöscht werden, sondern ungestört 
erhalten bleiben. Wenn man nun in einem längeren Programm 
an mehreren Stellen (zum Beispiel alle zehn Zeilen) einen sol¬ 
chen »Stör-Code« anbringt, würde regelmäßig die Ausgabe 
wieder links oben beginnen, und das Listing der vorher geLI- 
STeten Zeilen würde - zumindest teilweise - wieder über¬ 
schrieben werden. Da jedoch Basic-Zeilen unterschiedlich 
lang sind und somit in geLISTetem Zustand unterschiedlich 
viel Platz am Bildschirm beanspruchen, bliebe ab und zu den- 
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noch ein Teil des Bildschirms, nämlich der, der nicht durch 
das Listing der neuen Zeilen überschrieben wird, weiter 
erhalten, und es ließe sich nicht eindeutig bestimmen, wo die 
gerade angezeigte Basic-Zeile endet und wo nicht. 

Dies mag vielleicht nicht so einfach zu verstehen sein, wir 
wollen es darum einmal testen. 

Dazu opfern wir in der REM-Zeile 120 das Leerzeichen zwi¬ 
schen dem REM-Befehl und den Sternchen »**« für den 
ASCII-Code von HOME ($13= # 19): 

>01038 IC 78 00 8F13 2A 2A... 
oder > 1C3C 13 eingeben. 

Jetzt können Sie mit X und LIST den Effekt sehen: Die 
Sternchen aus Zeile 120 und die Zeilen 130/140 werden wie¬ 
der von links oben geLISTet. Wenn Sie das Überschreiben 
sehen wollen, geben Sie folgenden Basic-Befehl ein: 
SCNCLR:LIST 

Der Befehl SCNCLR bewirkt, daß der Bildschirm gelöscht 
und der Cursor in die HOME-Position gebracht wird. Bei 
einem längeren rmjb HOME-Codes manipulierten Programm 
ist dieser SGNCLR-Befehl nicht nötig, da aufgrund des Scrol¬ 
lings (Abrollen des Bildschirms) früher oder später die Aus¬ 
gabe oben ankommt (weil weiter unten ausgegebene Zeilen 
hoch-gescrollf werden). 

Das akustische Klingelzeichen 


Aufgrund des Steuerzeichens für das Klingelzeichen 
(ASCII-Code: $07= #7, drücken Sie einmal auf 
<CONTROL+G>, damit Sie es hören) können wir neben 
Farbe, Ordnung und Chaos sogar Soundeffekte ins Listing 
integrieren. Zwar sind diese recht bescheiden - ein einziges 
Tonsignal steht uns nur zur Verfügung -, aber ganz gut geeig¬ 
net, um zum Beispiel sich selbst auf eine bestimmte Stelle im 
Listing aufmerksam zu machen. 

Man muß im Grunde nur den Code $07 (# 7) in einer REM- 
Zeile einbauen. Hierbei sind drei Dinge zu beachten: 

Wenn der Code in Anführungszeichen steht, wird er - wie 
alle Steuerzeichen außer CR - unterdrückt. 

Die Klingelzeichen-Codes sollten nicht zu kurz aufeinan- 
derfolgen, weil es sonst sein kann, daß das eine Klingelzei¬ 
chen noch verklingt, während das andere beginnen soll. Dies 
hätte zur Folge, daß das Klingelzeichen nicht unbedingt 
erfolgt. 

Das akustische Klingelzeichen darf nicht vorher durch 
<ESC+H> verboten worden sein. Dies kann man dadurch 
umgehen, daß im Listing die Sequenz <ESC+G>, die das 
Klingelzeichen wieder zuläßt, ausgegeben wird. Damit wer¬ 
den wir uns noch in diesem Abschnitt - allerdings an späterer 
Stelle - befassen. 

Da der erste Punkt ohnehin für fast alle Steuerzeichen gilt, 
sind also nur zwei Punkte beim Klingelzeichen zusätzlich zu 
beachten. Den dritten Punkt werden wir auch noch überflüs¬ 
sig werden lassen. 

Nun aber soll das Klingelzeichen im Programm Versuchs¬ 
kaninchen auf Kosten eines Sternchens »*« integriert wer¬ 
den: 

01C38 IC 78 00 8F 13 07 2A... 
oder einfach >1C3D 07 eingeben. 

Der Tabulator 


Um komfortable Einrückungen vorzunehmen, ist die 
<TAB>-Taste vorgesehen. Diese kann mit Hilfe von 
<CONTROL+l> leicht ersetzt werden. 

Der ASCII-Code ist $09 (#9), und anstelle des nächsten 
Sternchens soll dieser nun seinen Platz im Listing finden: 
>01C38 IC 78 00 8F 13 07 09 2A... 

Wenn Sie jetzt das Programm LISTen lassen, können Sie 
sehen, daß die Sternchen eingerückt werden. 


Mit Hilfe der Tasten <SHIFT+CBM> (Commodore-Taste) 
kann man zwischen dem Text- und dem Grafik-Zeichensatz 
umschalten. Es gibt allerdings Situationen, in denen eine 
Umschaltung wüstes Chaos hervorrufen würde (zum Beispiel 
weil anstelle von Grafikzeichen nur Großbuchstaben erschei¬ 
nen oder umgekehrt), besteht auch eine Möglichkeit, die 
Umschaltung zu unterbinden. Auch ein Entriegeln der Tasten¬ 
kombination <SHIFT+CBM> ist möglich. Die ASCII-Codes 
dazu sind $0B (# 11) zum Ver-, $0C (# 12) zum Entriegeln. 

Probieren wir zunächst das Steuerzeichen $0C (zum Ent¬ 
riegeln) aus: 

>01C38 IC 78 00 8F 13 07 09 OC... 
oder nur >1C3F OC eingeben. 

Verriegeln Sie nun die Umschaltung über < CON¬ 
TROL-!-^. LISTen Sie dann (einfach < F7 > drücken) und 
schalten Sie dann zwischen den Zeichensätzen um. Auf¬ 
grund des Steuerzeichens in der REM-Zeile 120 wird es nun 
gehen - quod erat demonstrandum. 

Sie stimmen mir sicher zu, daß ein Entriegeln von 
< SHIFT+CBM > in den meisten Fällen sinnlos ist. Viel wich¬ 
tiger ist die Funktion des Verriegelns, die wir folgendermaßen 
- anstelle des $0C-Codes - einbauen wollen: 

>01C38 IC 78 00 8F 13 07 09 OB... 
oder nur >1C3F OB eingeben. 

Dieses Verbot des Zeichensatz-Umschaltens ist erst in 
Verbindung mit der programmierten Einstellung eines 
bestimmten Zeichensatzes möglich. Da der ASCII-Code zum 
Umschalten auf Text-Zeichensatz größer als $80 ist und das 
Umschalten des Zeichensatzes mittels Steuerzeichen nicht 
zu verhindern ist, werden wir auch einen solchen Code ein¬ 
bauen. 

Umschalten auf Text-Zeichensatz 


Der Text-Zeichensatz wird über PRINT CHR$(14) eingestellt. 
Das Steuerzeichen hat den ASCII-Code $0E (# 14), und muß 
nur in die REM-Zeile eingebaut werden: 

>01C40 OE 2A... 
oder >1C40 OE eingeben. 

Wenn Sie nun LIST eingeben, wird spätestens ab der 
Stelle, an der das $OE-Steuerzeichen steht, der Text in Klein- 
/Groß-Schrift ausgegeben. 

Blinkender Text 


Mit Hilfe von Steuerzeichen können wir auch bewirken, daß 
der Text einer bestimmten Zeile - bis eben das nächste CR 
ausgegeben wird - in blinkender Form erscheint. Das ent¬ 
sprechende Steuerzeichen zum Einschalten des Blink- 
Modus für bestimmte Zeichen hat den ASCII-Code $0F 
(# 15). Diesen bringen wir auch in der REM-Zeile 120 unter: 
>01C40 OE OF 2k... 
oder > 1C41 OF eingeben. 

Nun blinken die dem $0F-Code folgenden Sternchen beim 
LISTen. 

Die CRSR-DOWN- und die 
CRSR-RIGHT-Bewegung 


Auch die ASCII-Codes der CRSR-DOWN-Bewegung (Cursor 
runter) und der CRSR-RIGHT-Bewegung (Cursor nach 
rechts) liegen unter $80. Die Codes sind: 

CRSR DOWN = Cursor runter $11 = #17 
CRSR RIGHT = Cursor rechts $1D = #29 
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Testen wir zunächst den CRSR-RIGHT-Code: 

>01040 OE OF 1D2A... 
oder >1042 ID eingeben. 

Jetzt wird vor den Sternchen einmal der CRSR-RIGHT- 
Code ausgeführt. 

Viel häufiger wird jedoch die Anwendung des CRSR- 
DOWN-Codes sein, weshalb wir unsere erste Manipulation - 
den CRSR-RIGHT-Code - überschreiben: 

>01C40 OE OF 11 2A... 
oder >1C42 11 eingeben. 

Nun werden die Sternchen eine Zeile weiter unten ausge¬ 
geben als vorher. 

Da durch eine Cursor-Bewegung nicht auf den Normal- 
Modus zurückgeschaltet wird, bleibt der Blink-Modus weiter¬ 
hin erhalten. 

Inverse Kommentare 


Um bestimmte Texte - vor allem Kommentare in REM-Zeilen 

- gut hervorzuheben, ist die Invers-Darstellung sehr gut 
geeignet. Wir wollen nun - auch wenn ein weiterer Stern dran 
glauben muß - den RVS-ON-Code (ASCII-Code: $12= # 18) 
einbauen, damit der blinkende Text zudem invers abgebildet 
wird: 

>01C40 OE OF 11 12 2A... 
oder >1C43 12 eingeben. 

Wenn man bestimmte Kommentare zwecks besserer Les¬ 
barkeit hervorheben möchte, empfiehlt es sich wirklich, diese 
invers erscheinen zu lassen. Am besten setzt man vor den 
Kommentar, der invers werden soll, bei der Eingabe über den 
Basic-Editor ein Zeichen, das dann mit dem Code $12 über¬ 
schrieben werden kann. 

Besonders interessant ist hierbei, daß auch beim Listen auf 
den Drucker die Invers-Darstellung berücksichtigt wird. 

In unserem Beispielprogramm wollen wir nun, daß anstelle 
der Sternchen ein mehr oder weniger sinnvoller Text 
erscheint. Wir entscheiden uns für »REVERSER KOMMEN¬ 
TAR !!« und wandeln diesen mit einem bereits vorgestellten 
Trick in den entsprechenden ASCII-Code um. 

Wir geben dazu »H 0 0 'REVERSER KOMMENTAR !!« ein 
und finden dann die Lösung bei $0A80 mittels »M A80«. 

Nun setzen wir die Lösung an der richtigen Stelle - bei 
$1C44 - ein: 

> 1C44 52 45 56 45 52 53 45 52 20 4B 4F 4D 4D 45 4E 
54 41 52 20 21 21 

Geben Sie diesen Befehl unverändert ein. 

Nun haben wir einen ersten Satz von Änderungen durchge¬ 
führt. Am besten speichern Sie das Programm in diesem 
Zustand: löschen Sie aber die alte Version nicht. 

Von den Steuerzeichen unter $80 haben wir bis auf zwei 

- DEL und ESC - schon alle behandelt und die meisten ins 
Programm Versuchskaninchen eingebaut. Nun befassen wir 
uns noch mit den fehlenden Steuerzeichen DEL und ESC, die 
wirklich interessante Manipulationen erlauben. Zunächst soll 
uns DEL interessieren. 

DELETE-Zeichen löschen 


Mit Hilfe der Taste < DEL/INS > kann man das letzte ausge¬ 
gebene Zeichen löschen. Das Steuerzeichen DEL (DEL als 
Abkürzung für DELETE, englisch »löschen«) arbeitet außer 
im »insert mode« in jedem Modus - also auch im 
Anführungszeichen-Modus. 

Eine häufige Anwendung von DEL (ASCII-Code: 
$14= #20) ist es, daß man Teile des Listings durch eine 
REM-Zeile voller DEL-Codes unmittelbar nach dem Ausge¬ 


ben wieder löscht, so daß der Eindruck entsteht, es wäre kein 
Text ausgegeben worden. 

Wir wollen nun testhalber bewirken, daß beim LISTen von 
Zeile 120 der Anfang »120 REM« unmittelbar nach dem 
LISTen gelöscht wird. Wir benötigen sieben DEL-Codes, da 
beim LISTen sieben Zeichen (120 REM) ausgegeben wer¬ 
den. Daß REM als Ein-Byte-Wert (Token) abgelegt wird, ist in 
diesem Fall uninteressant, da wir drei DEL-Codes - REM - 
benötigen, denn die Tokens werden ja vor dem LISTen in den 
Klartext umgewandelt. 

Für die sieben DEL-Codes müssen wir auf ein paar Steuer¬ 
zeichen verzichten: 

>01C3C 14 14 14 14 14 14 14 12 52... 
oder >1C3C 14 14 14 14 14 14 14 eingeben. Noch einfa¬ 
cher einzugeben ist der Fill-Befehl »F 1C3C 1C42 14«. 

Wenn Sie jetzt »LIST 120« eingeben, sehen Sie folgendes 
in Inversdarstellung: 

REVERSER KOMMENTAR !! 

Der Text 120 REM wird nämlich durch die sieben DEL- 
Codes sofort wieder gelöscht. Wenn man genau hinsieht, 
kann man dies sogar erkennen (wenn auch nur schlecht, da 
das Löschen doch ziemlich schnell geht). Besonders lang¬ 
sam geht es, wenn man im Slow-Modus auf 80-Zeichen- 
Darstellung schaltet und dann LISTen läßt. In diesem Fall kann 
man fast jedes Zeichen erkennen. 

Um den Übergang zum Rest dieses Abschnitts zu finden, 
laden Sie bitte noch einmal die vor dem Einfügen der DEL- 
Codes gespeicherte Version - oder die Anfangsversion, 
wenn Sie vor dem Einsetzen der DELs das Speichern verges¬ 
sen haben. Geben Sie dann >1C3C 1B 44 ein und LISTen 
Sie. Jetzt geht das Löschen sehr schnell und wir müssen nur 
zwei - statt sieben - Codes dafür verwenden. 

Wir haben nämlich auf eine ESC-Anweisung zurückgegrif¬ 
fen, die eine ganze Bildschirmzeile löscht: <ESC+D>. 

Das mächtige Werkzeug ESC 


ESC ist die Abkürzung für ESCAPE (englisch »fliehen«). Mit 
Hilfe der < ESC >-Taste (links oben an der C128-Tastatur) 
kann man einige Funktionen anfordern (sogenannte Flucht¬ 
oder ESCAPE-Sequenzen), die im C128-Handbuch aufge¬ 
führt sind. Diese erlauben unter anderem 

- die Definition von Bildschirmfenstern 

- das Erlauben/Verbieten des Klingelzeichens 

- Einfügen und Löschen von Bildschirmzeilen 

- Scrolling nach oben und unten 

- Cursor-Bewegung an Zeilenanfang oder Zeilenende 

- Löschen eines Teils einer Zeile 

- Löschen des Bildschirms ab Cursor-Position 
und vieles andere. 

Der ESC-Code, der. vom aktuellen Eingabemodus völlig 
unabhängig ist, arbeitet folgendermaßen: 

Sobald ein ESC (ASCII-Code: $1B= #27) ausgelöst wird 

- zum Beispiel durch Drücken der ESC-Taste -, merkt sich 
dies der Computer. Das nächste ausgegebene Zeichen wird 
dann nicht ausgegeben, sondern als ESC-Anweisung behan¬ 
delt. Diese Anweisungen werden durch einige Buchstaben 
und den Klammeraffen (@) bezeichnet: 

A = AUTO INSERT MODE ON; automatisches Einfügen 
einschalten 

B = BOTTOM; rechte untere Ecke des Windows setzen 
C = CLEAR AUTO INSERT MODE; AUTO INSERT MODE 
ausschalten 

D = DELETE; aktuelle Bildschirmzeile löschen 
E = END CURSOR FLASH; Cursor-Blinken beenden 
F = FLASH ON; Cursor-Blinken einschalten 
G = <CONTROL+G> erlauben 
H = <CONTROL+G> verbieten 
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I = INSERT; Bildschirmzeile einfügen 
J = JUMP TO BEGINNING; Cursor an Anfang der Zeile set¬ 
zen 

K = Cursor hinter letztes Zeichen der Zeile setzen 
L = LET SCROLL; Scrolling zulassen 
M = Scrolling verhindern 

N = NORMAL; normale Bildschirmdarstellung (nicht invers) 
O = OFF; alle Modi abschalten (Blinken, Unterstreichen, 
Invers) 

P = clear until POSITION; bis Cursor-Position löschen 
Q = von Cursor-Position an aktuelle Zeile löschen 
R = REVERS; Revers-Darstellung für gesamten Bildschirm 
S = SWITCH ON; Blockdarstellung für den Cursor ein¬ 
schalten 

T = TOP; linke obere Ecke des Windows setzen 
U = Strichdarstellung für Cursor 

V = Scrolling nach oben 
W = Scrolling nach unten 

X = zwischen 40- und 80-Zeichen-Darstellung umschal¬ 
ten 

Y = voreingestellte Tabulatorstops nehmen 
Z = voreingestellte Tabulatorstops löschen 
@ = Bildschirm ab Cursor-Position löschen 

Die Befehle N,R und U funktionieren nur im 80-Zeichen- 
Modus. 

Wie Sie sofort sehen können, kommt eine ungeheure Viel¬ 
falt an Manipulationsmöglichkeiten auf uns zu. 

Der große Vorteil des ESC-Befehls ist, daß er mit $1B 
(#27) einen ASCII-Code hat, der kleiner als $80 ist. Wenn 
wir nun einen ESC-Befehi im Speicher ablegen wollen, benö¬ 
tigen wir immer nur zwei Byte: 

1B und ASCII-Code des Befehls (zum Beispiel $41 für A) 
ESC-Code sasa 


Die ESC-Befehle 


Wir wollen nun das Beispielprogramm Versuchskaninchen 
(bitte laden Sie jetzt die ursprüngliche Version ohne Manipu¬ 
lationen) mit ESC-Befehlen (auch »ESC-Sequenzen« 
genannt) bearbeiten. 

Als erstes sorgen wir dafür, daß der Kommentar in Zeile 
100 ohne das davorstehende »100 REM« erscheint. Wir 
überschreiben zu diesem Zweck das Leerzeichen und das 
Anführungszeichen nach dem REM mit der Sequenz ESC-D 
(DELETE aktuelle Bildschirmzeile löschen): 

>01C00 00 24 IC 64 00 8F 1B 44 50 52 4F... 
oder einfach >1C06 1B 44 eingeben. 

$1B ist der ASCII-Code für ESC, $44 derjenige für die 
ESC-Anweisung D (DELETE). 

Nun führen wir noch einige Manipulationen durch, zu 
denen nicht viel zu sagen ist. 

Als erstes soll der Bildschirm ab Cursor-Position beim 
Listen von Zeile 120 gelöscht werden: 

>01C38 IC 78 00 8F 1B 40 2A 2A... 
oder >1C3C 1B 40 eingeben. 

1B 40 entspricht ESC-@. 

Als zweites soll die entsprechende Bildschirmzeile bis zur 
Cursor-Position gelöscht werden (damit das 120 REM weg¬ 
fällt): 

>01C38 IC 78 00 8F 1B 40 1B 50 2A... 
oder >1C3E 1B 50 eingeben. 

1B 50 entspricht ESC-P. 

Ferner soll während des LISTens von Zeile 120 eine 
Umschaltung der Zeichendarstellung (40- oder 80 Zeichen 
pro Zeile) erfolgen. Dadurch wird dann der Rest des Listings 
auf einen anderen Monitor ausgegeben als der Beginn, was 


nicht zur Übersichtlichkeit des Listings beiträgt. Wenn man in 
längeren Programmen alle paar Zeilen umschalten läßt, wird 
das Listing wirklich unübersichtlich - allerdings existiert noch 
der Ausweg des LISTens auf den Drucker. Nun die entspre¬ 
chende Änderung am Programm Versuchskaninchen: 
>01C40 1B58 2A 2A... 
oder >1C40 1B 58 eingeben. 

1B58 entspricht ESC-X. 

Nur als Spielerei - damit es auch einmal besprochen wird 
- soll noch der Bildschirm nach oben gescrollt werden: 
>01C40 1B 58 1B 56 2A 2A... 
oder >1C42 1B 56 eingeben. 

1B 56 entspricht ESC-V. 

Wenn Sie statt des Scrollings nach oben lieber nach unten 
scrollen wollen, ist folgende Änderung nötig (anstelle von 
ESC-V): 

>01C40 1B58 1B57 2A 2A... 
oder >1C42 1B 57 eingeben. 

1B 57 entspricht ESC-W. 

Außerdem sollen oberhalb der aktuellen Bildschirmzeile 
zwei Zeilen eingefügt werden: 

>01C40 1B58 1B57 1B49 1B49 2A 2A... 
oder einfach >1C44 1B 49 1B 49 eingeben. 

1B 49 entspricht ESC-I. 

Ganz nebenbei wollen wir auch noch alle Zusatz-Modi 
(Blinken, Invers, Unterstreichen) abstellen: 

>01C48 1B4F2A 2A... 
oder >1C48 1B 4F eingeben. 

1B 4F entspricht ESC-O. 

Dafür soll noch der ganze 80-Zeichen-Bildschirm, auf dem 
aufgrund der Sequenz ESC-X am Anfang der Zeile 120 sicher 
ein Teil des Listings steht, invertiert werden, wobei zum Funk¬ 
tionieren der entsprechenden ESC-Sequenz nicht einmal 
der 8C-7.3ichen-Modus angeschaltet sein muß: 

>01C48 1B 4F 1B 52 2A 2A... 
oder > 1C4A 1B 52 eingeben. 

1B 52 entspricht ESC-R. 

Zwischendrin lassen wir das nächste Sternchen weiterexi¬ 
stieren (damit auch ein Sternchen »*« ausgegeben wird). 
Dann aber stellen wir den Cursor auf Festanzeige (das heißt, 
wir stellen das Cursor-Blinken ab): 

>01C48 1B 4F 1B 52 2A 1B 45 2A 2A 2A... 
oder > 1C4D 1B 45 eingeben. 

1B 45 entspricht ESC-E. Das Gegenstück wäre 1B 46 
(ESC-F). 

Vorhin haben wir das akustische Klingelzeichen (ASCII- 
Code: $07 = # 7) verwendet. Dabei wurde der Hinweis 
gegeben, daß durch eine ESC-Sequenz, nämlich ESC-H, 
dieses Klingelzeichen unterbunden werden kann. Unter 
Zuhilfenahme einer anderen ESC-Sequenz läßt sich ein sol¬ 
ches eventuell erfolgtes Unterbinden aber leicht wieder 
rückgängig machen: 

>01C4D 1B 45 1B 47 2A 2A... 
oder > 1C4F 1B 47 eingeben. 

1B 47 entspricht ESC-G. Um die Wirkung davon zu testen, 
bietet es sich an, direkt hinter der ESC-Sequenz ein Klingel¬ 
zeichen einzubauen: 

>01C4D 1B45 1B47 07 2A2A... 
oder > 1C51 07 eingeben. 

$07 ist der ASCII-Code des akustischen Klingelzeichens. 
Zu guter Letzt definieren wir über die Sequenz ESC-T-TAB- 
ESC-B ein Window von wenigen Spalten Breite und nur einer 
Zeile Länge: 

>01C50 47 07 1B 54 09 1B 42 2A 2A... 
oder >1C52 1B 54 09 1B 42 eingeben. 

1B 54 entspricht ESC-T, 09 entspricht TAB und 1B 42 ent¬ 
spricht B. 

Nun haben wir einige ESC-Sequenzen, mit denen sich viel 
anstellen läßt, ausprobiert. 
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1 -Sammlung 


Schaffen Sie sich ein interessantes Nachschlagewerk und gleichzeitig ein 
wertvolles Archiv! 


Kennen Sie alle Ausgaben von 64’er? Suchen Sie einen ganz bestimmten Testbericht? Oder haben Sie einen Teil 
eines interessanten Kurses versäumt? Suchen Sie nach einer speziellen Anwendung? 

Damit Sie jetzt fehlende Hefte mit »Ihrem« Artikel nachbestellen können, finden Sie auf diesen Seiten eine 
Zusammenstellung aller wesentlichen Artikel der Ausgaben 01 bis 12/85. 

Und so kommen Sie schnell an die noch lieferbaren Ausgaben: Prüfen Sie, welche Ausgabe in Ihrer Sammlung 
noch fehlt, oder welches Thema Sie interessiert. Tragen Sie die Nummer dieser Ausgabe und das Erscheinungs¬ 
jahr (z.B. 2/85) auf dem Bestellabschnitt der hier eingehefteten Bestell-Zahlkarte ein. Die ausgefüllte Zahlkarte ein¬ 
fach heraustrennen und Rechnungsbetrag beim nächsten Postamt einzahlen. Ihre Bestellung wird nach Zahlungs¬ 
eingang umgehend zur Auslieferung gebracht. 
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20 

OB/65 


Schilder kontra Knacta'a 

23 

0B/B5 


Raub-Talkshow 

12 

0B/85 


Das Urhcbenechtsgesetr. und Gedanken zu notner 

21 

06/85 


Anwendung 




Änderung den Urhcberrochtsgosefzes 

162 

09/35 

Buchbesprechungen 



AnCtnge« 

Coldmann Computer Compact 

H7 

03/85 


Baac-Wogwoisor für den C 64 

06 

05/85 


Alles ubcT den C 64. Sachbuchreihe. Band 1 

115 

06/35 


Lehrepurbeug Computer C 64/VC 20 

112 

11/35 


C 64 Computerhaudbuch 

171 

11/35 


Elnfühningakur* Commodore 64 

144 

12/85 

Anwendung 

Dienstprogramme VC 20. C 64 und SX 

86 

05/85 


Spaß an Mathe mit dem Commodore 64 

OB 

07/35 


Mathe für dio Oberstufe mit dom C 64 

30 

07/B5 


Mathematische Routnen VC 20, Elektrotechnik/ 

112 

11/85 


Elektronik 




Commodore 64-Liaungs Band 2: Datoivcrwaltung. 

112 

11/85 


5chule. Hobby 




Das Tnumngsbuch zum Datamat 

144 

12/85 

C 12B 

Bücher rum C 12B 

22 

10/85 

DFÜ 

Daa Mailbox-Jahrbuch' Nut* dio Hetze 

112 

11/35 

Grafik 

Grafik auf dem Commodore 64 («-Fohlen 9/05) 

06 

0S/B5 


Einführung Ui CAD mit dem Commodore 64 

138 

06/35 


Grafik & Mimik auf dem Commodoro 64 

96 

07/85 



115 

OB/85 


Von Basic zu Aaaemblor: Das Commodorc-Buch. 

115 

06/35 

ton 

Band 4 




64 lntem 

IIS 

oc/ar. 


Daa Interface Ago System-Handbuch zum C 64 

115 

06/85 


Daa C 64 Buch Band 5- Simons Basic Leitfaden 

144 

12/05 


Baaicodo 

144 

13/85 


Noch mohr Tlpa und Tnck* rum 64or 

144 

12/05 

Speichern 


B7 

03/05 


Die Floppy 1541 (M&T) 

(iS 

07/86 

Spio'.o 

Kombacha C 04 Sptclfuhior 

07 

03/05 


Commodoto 04-Listtngo. Band 1 Spioie 

112 

11/HS 


35 ausgesuchte Spiele für Ihren Commodore 64 

171 

1/05 

64'er Extra 



Praceaoor 

Belehlnatx dea 6502/0510-Pioioaiiora 

04 

09/06 

Grafik 

Die Vidoochip-Regtater doa C 64 

02 

10/05 

Sound 

Dor SID-Chtp, seine Rogutcr und Progiummiorung 

92 

11/06 

Spotchor 

Die Speicherbelegung de« C 64 

96 

12/08 

Abenteuerlösungen 



löaungon 

Daltau-Quos« Losung 

90 

01/RS 


Cuncho Krill Enchanter ist goltisi 

44 

03/115 


Infocom-Goheimniaao gelüftet’ 

49 

05/BS 


Dea Ramels Lösung. Amazon 

143 

06/B3 



36 

12/85 


Tracer SancUon) 




Eurcka! - Ich hab'al 

37 

12/85 


Loaungon au Hitchhiknra Guido und 5orcoror 

39 

12/85 

Spiele-Tests 



007 

Jarno* Bond - A Vtew to a Kill 

156 

09/35 

Abenteuer 

Abentuuorpakct 1 

4H 

(H/85 



146 

00/115 


The Ouosi - mit C 64 auf Suche nach Diachon 

47 

01/05 

Action 

Hoaonkuciie 

50 

07/RS 


Master of the Lamp« 

46 

07/85 


Roscuc on Fractalun 

150 

10/05 


Stellar 7 

4D 

06/B5 

Construction 

Mail Ordor Monsters 

49 

06/05 

Ser 





Racing Destniction Set 

50 

06/HS 

Geschick- 

Austraiopedicur. Robustus 

50 

06/05 

Iichkmt 





Boulder Doah 11 

159 

10/35 


Cryntal Castles 

50 

07/05 


Grlbbly'a Day out 

148 

09/35 


Rock'n Bolt 

4B 

00/35 


Thing on a Spring 

159 

10/35 


Tom • Zaga 

40 

01/35 

Pr-eudo- 

Roland’a Rat Race 

49 

06/85 

Adventures 





Fourth Protocol und Frantao g.t.H. 

162 

11/85 


Stichwort Titel Seite Anagabo 



Dte Renner 1905: Moistvorkaufto 5ptolo 

34 

12/85 

Schach 

Viermal Schachmatt: VOrachiodono Schachprogramme 32 

12/89 

Simulation 

Elite 

140 

09/89 


Jump Jet 

140 

09/85 


Super Huoy Hubschraubenumulolor 

411 

07/85 

Sport 

Boxcptolc: Frank Bruno's B * Barry McCuigan 
Champions B 

185 

12/85 


ding Fist 

Nick Fol da Plays tho Opon (Golf) 

159 

10/85 


Rallye Speedway 

49 

07/85 


51apr.hot (Eishockey) 

50 

07/85 


Summer Games II 

145 

03/85 


World Seriös Baseball 

49 

07/85 

Diverses 

New York City und Air Support 

145 

06/85 

Hardware-Tips und Bauanleitungen 




am C 64) 

Em Monitor ist gonug (RGB * Composito an C 128) 

16 

10/85 

C IS 

Alto Datasette am C 16 

31 

04/95 


Alter Joystick am C 16 

35 

05/35 

Eingabe¬ 

geräte 

Dor Hexer — Zusarztastatur für den M5E 

48 

10/05 

EPROM 

EPSOMs im Expansion-Port 

46 

10/35 


SSHH3SE 

42 

44 

10/05 

12/35 

Floppg/Data- 

Diskettenlaufwerk 1541 selbst justeit 

32 

10/05 

sotto 

Dto Datasette streikt nie wieder (Anpassung dea 
Tonkopfs) 

54 

10/05 

lEC-Bus 

Auf zu neuen Weiten: lEC-Bus im Sdbstbau 
(♦ Fohlortcufcl 10/85) 

44 

07/B5 

Joystick 

Joystick im Solbstbau 

33 

03/BS 


Dauerfouer-Adapter 

46 

08/85 

RS232/V.24 

Das 30-Mark-Intorfaco (Solbstbau RS232) 

29 

03/6S 


Genau betrachtet: Dio RS332/V.24-Schruttstelln 

80 

05/85 

Dtvcrucs 

Üscrport-Duploy 

36 

05/65 


Reset-Taster für alle FUllo (.Fohlon 9/85) 

130 

06/65 


Aus eins mach vier (aboturefreie Betriebssystem- 
umschaltung) 

41 

07/85 

Hardware-Grundlagen 



Computer 

Was bringt der C 128? 

28 

11/85 

Drucker 

Welcher Drucker ist dor Richtige? (GrundLagon) 

15 

05/85 


Hammorwerke — wie funktionieren Typonrad- 

32 

06/85 


drucket 

Dio Alternativen: Thermo-, Tmtonstrahldruckor 
► Plotter 

24 

07/85 

Eingabe- 

Versteht Sie Ihr Computer? (Wie funktionieren 

44 

09/85 

gerate 

Eingabegeräte) 



Floppy 

Floppi- oder Datasette? 

139 

06/85 

Mottitoro 

Wio funktionieren sie. was int beim Kauf zu boachton? 

16 

12/85 


Dan Kabel mm Monitor Welche Normen gibt es? 

28 

12/05 

Peripherie 

Grafikelngabegetat: Wlo funktionieren alo? 

30 

06/85 

Hardware-Tests 



Computer 

GencniUanswechnol: Tost C 10 

16 

01/85 


Erster ausführlicher Tbst C 128 PC (Teil 1) 

16 

06/85 


Ennor ausführlicher Tbst C 138, PC (TbU 2) 

17 

07/85 

DFÜ 

MarktUbereicht Modems & Akustikkoppler 

32 

07/85 

Drucker 

Vorglotch. Dnickor unlor 700 Mark (Testa und 
Mnrktüberetcht) 

18 

06/85 


Tests und Marktuboreicht Typenraddruckor 

35 

06/85 


Test. Biothor EP 44 

27 

07/86 


Btother TC 600 

118 

00/85 


Ritoman C* 

133 

09/85 


Panasonic KX-P109I 

134 

09/85 


Star BO 10C 

133 

09/85 


Melchern CP0OX - wie hatten Sio's denn gom? 

23 

10/05 


Gohoimtip Der RF1 DP 169 

24 

I0/8S 


Epson GX 00 - olnor fUr ollo 

26 

10/85 


MPS 803 - oin Druckor fUr olle Cclogonhotten? 

40 

1/85 


Epson JX 00 don vlnlfarbigo Druck-Genie 

3B 

11/85 


Epoon FX-B3 neue Refeienz 

42 

11/85 


5P 1000 VC - Suporatar mit Haken 

41 

11/85 


Der NEC-P2 - das fcmOctlicho Wunder 

189 

13/85 


DMPG9 - eine solide Sacho 

102 

12/85 


Das Doppolloben des Joystick-Borts lOer-Tastaturon 

50 

09/85 


Joysticks' Tost und Marktübernicht (* rohlortoufel 

19 

11/85 


12/BS) 

Es goht auch andora- Lightpons und Trackballs 

23 

11/85 

EPROMor 

Frisch gobmnnt Ist halb gespeichert (EPROM- 
Programmiergeräte lm Tbst) 

39 

07/85 


OuickByto II — das Krafrpakot 

14 

10/85 

Foppy/Data- 

Turbo-Floppios. zweite Goneration: Spoeddon plus 

20 

10/85 

netto 

♦ Proiogic DOS 

37 

10/85 


Professionelle Floppylaufwciko ftlr den C 64 (1EC- 
Floppieo) 

30 

10/85 


Out gekauft ist halb gespeichert (Marktübereicht 
Disketten) 

38 

10/85 

Grafik 

Die Vldeoweikatatt (Digitizer-Test) 

32 

05/05 


Digltalbilder md. C 04- PnntTOchnik Digitizer 

24 

01/85 


Gute Connections - Übersicht Schnittstellen 

21 

03/85 


Card/Pnnt *6 — Das Allround-Interface 

30 

03/85 


Das Wiesemann-Contronlcs-Interface 

18 

03/85 


Stichwort Titel 



Erst oln lEC-Bus öffnet Tür und Tbr 

24 

03/05 


(•Fohlen.4/6-83) 



Momtom 

MarktUboreichr Monochrome Monitor" 

30 

12/05 

Musik 

Trommelwirbel. Tbst Digital Drums 

45 

00/05 


Dio Musikltardwaie rum C 64 

17 

09/85 

Roboter 

Roboter solbst gebaut (Fuchortcchnik) 

167 

10/05 

Scanner 

So lornt Ihr Drucker losen 

30 

06/R3 

Speicher 

Speicherturung VC 20: Test 64 KByte Karte 

26 

01/B5 

Steuern 

Flottes Türmchon: MEA-Interfacc 

116 

0B/BS 

turse 





Assembler litt keine Alchimie, TbU 5 

142 

01/85 


Assembler ist keino Alchimie. Teil 7 

124 

03/ßS 


Assembler ist keine Alchimie. Toll B 

130 

05/85 


Assembler ist ko me Alchimie Teil 10 

127 

07/8S 


Assembler ist keine Alchlmio. Teil 11 

126 

08/B5 


Assembler ist keine Alchimie. Teil 12 

109 

09/65 


Assembler ist keine Alchimie. Tbü 13 (Schluß) 

143 

10/85 

C 128 

Entdeckungsreise duch den C 123 

42 

12/85 

Effektiv©:; 

Müllabfuhr im Computer Garbogo Colloction. 

122 

01/85 

Programm- 

TBll l 



ren 

Finden mit System, oino neuaruge Suchmethode. 

Teil 3 

148 

03/85 


Soroeren mit dom Computer. Ted 2 

153 

05/65 


Sortieren mit dem Computer. Tbü 3 

124 

06/83 


Sortiorcn mit dom Computer. Teil 4 

138 

08/85 


Sortieren mit dom Computer. Teil 5 

124 

09/85 


Sortieren reit dom Computex. Teü 6 (Schluß) 

150 

12/BS 

Estern 

C 64 extern — Der Wog nach draußen. Teü 1 

144 

08/85 


C 64 extern — Dor Weg nach draußen. Teü 2 

122 

09/85 


C64extern—Dor Weg nach draußen.Tbil3(Schluß) 

129 

10/85 

Floppy 

ln die Geheimnisse der Floppy eingetaucht, TbU 4 

148 

01/85 



130 

03/8S 


ln die Gchoimmse dor Floppy oinaotaucht. Tbü 6 

145 

05/85 


ln die Cohoimnisso der Floppy cingctaucht, 1bü 7 
(Schluß) 

116 

oe/es 


Directory-Manipulationen I 

140 

06/85 

Floppy 

Dircctory-Manipulationcn II 

163 

10/86 

Grafik 


138 

03/8S 


Hlros 3 - Grafikkurs-Anwendung, Tbü 3 (Schluß) 

133 

03/85 


Spntos ohne Geheimnisse 

40 

09/85 


StreifEUgo durch dio Crafikwolt. Toll 1 

I0S 

09/85 


StxoifSUgo durch dte Crafikwolt. Tbü 2 

149 

11/83 

Logeleien 

Logeleien. TeU 1 

143 

07/85 


Logoleien. Tbü 3 

136 

00/85 


Logoloion. Tbü 3 (Schluß) 

115 

09/85 

Musik 

Dom Klang aur dor Spur. TBÜ 2 

IM 

01/85 


Dem Klang auf dar Spur, Ibil 4 

131 

04/B5 


Dom Klang auf dor Spur, Toil 5 

132 

05/83 


Dem Klang auf der Spur, Tbü 7 

132 

07/85 


Dem Klang auf dor Spur, TbU 8 

133 

0B/B5 


Dom Klang auf dor Spur. Taü 0 

126 

10/35 


Dem Klang auf der Spur. Teü 10 (Schluß) 

157 

11/05 

Speicher 

Momory Map mit WandorvoiachUgon. Teil 3 

126 

01/05 


Memory Map mit WandorvorechLignn. Tbü 3 

144 

03/05 


Momory Map mit WandorvoiachUgon. Tbü 7 

130 

00/05 


Memory Map mit Wandervorechlagon. TbU 8 

140 

07/05 


Memory Map mit WandervorschUgnn. Tbü 9 

129 

Ofl/Hfi 


Memory Map mit WandorvorochUgen. Tbü 10 

112 

00/85 


Momory Map mit Wandorvorachlagon Tbü II 

133 

10/06 



143 

11/83 


Memory Map mit Wandervorechlagon. Tbü 13 

146 

12/85 

Sprachen 

Baaic tat out - es lobo Fortli 

43 

01/RS 

VC 30 

Der gläserne VC 20. TbU 4 

IM 

01/85 


Dor gluorno VC 20. Tbü 0 (Schluß) 

165 

03/M 

Softwaie-Tips 



C 130 

Erato Fragen und Antworten zum C IM 

14 

09'83 


Fragen und Antworten «um 128er 

20 

I0/B3 


Fragon und Antworten zum 128er 

40 

12/85 

Druckor 

Dor MPS 802 lernt Deutsch 

30 

05/88 

Textvorarbol- 

Software Conrer — professionelle Programme 

174 

12/85 

tung 

Tip* & Tricks 

richtig emgeseut (Vizawnte-Tipo) 

Autoboot beim C 64 

Bß 

03/85 

Vorblndungsfroundlich(Parallel»chnittstolln des VC 20) Dl 

03/85 


Undefinierte Opcodor. des 0502 

04 

03/35 


Durch POKEa sum Erfolg (Sptele-POKEa) 

33 

03/35 


Tips und Erwoltorungon xu Hi-Eddi undSimons Basic 

00 

03/85 


Baslc-Bofehlo im Crtff 

79 

05/85 


Durch POKEn tum Erfolg Sptele-POKEa 

78 

00/05 


Formatierte Eingabe 

149 

06/65 


Hi-Tbxt (Toxt in Hlroa) 

70 

08/83 


Verbetene Variablen 

66 

09/65 


Verschiedene Routinen für Anttnger und Profis 
(« Fohlcrtoufcl 12/85) 

80 

11/05 


Der Tnck mit dom Joystick Ooywickabfrago) 

34 

11/8S 


Verschiedene Tipa nir Anfingor und Fortgo- 
■chrtttene 

100 

12/85 

Software-Grundlagen 



Assembler 

Assembler? Assembler'. (Einführung) 

32 

01/05 


Assembler-Bedienung leicht gemacht, Tbü 1 

169 

12/BS 

DFÜ 

Der einte Kontakt mit DFÜ 

40 

06/Q5 


Die Netze dor Post: Btx. Datox-P. Tolobox 

46 

06/05 


DFÜ - Was ist das’ 

44 

06/BS 


Maübox für Anfänger 

30 

07/85 



























Stichwort 

Titol 

Seile 

Ausgabe 

Stichwort 

Tirol 

Seil» 

Ausgabe 

Datoi 

Dio wichtigsten Begriffe der Dateiverwaltung 

42 

05/85 

Ibxtvoraibei- 

Homoword - Tbstvorarbouung tu Hause 

36 

03/85 


Datoivorwaltung ist nicht gleich Datenbank 

44 

05/85 

tung 

Totl-Toxi - Floxibilitat rar Trumpf 

38 

03/85 

Drucker 

Hardcopy leicht gemacht (wie programmier; man 

34 

05/85 


Textomal Plus kontra Visawnto 

132 

06/85 


Hardcopies) 




Der Preishammer fitest. Stailtextor) 

135 

09/85 

EPROM 

Wio sago ich o« moinem EPROM? (EPROM- 
Grundlagen) 

35 

07/85 


Paporclip — ausdrücklich gui 

44 

11/85 

Funktionen 

Funktionen für Anfänger 

164 

05/B5 





Lemon 

Besser lemon mit dom Compulor 

1ÖG 

10/85 





Munk 

Spiele 

Xlangprogrammiening ohne Ballast 

Taktik- und Straiogrcspielo 

10 

46 

09/B5 

03/85 

So machen’s andere 




Play by Mail und Play by Modem 

153 

05/BS 

Semmoln 

Scmmelaer/ice mH dem C 64 

147 

W/85 

Sprachon 

Sprachon hlr Computer. THrl 3 

46 

05/85 

Sport 

Commodoro Spoitsorvico Hoimcomputor sur 

157 

07/85 

Tbstverarbci- 

Von der Schreibmaschine tum Tbxoynom 

34 

03/85 


Turniers uswenung 



tung 



Hilfe 

Computer für Bohlndertc 

182 

12/86 


Listin gs zum Abtippen 

Anwendung Der C 64 als Handbailtramor (AdM) 

Ligatab - ohne Organisation Vom Tbr (IdM) 

Cut Ziel mit demC64- Schüttonvoromaoigobniaac 
(AdM) 

Wölbt du. wievlol Sretnlcm alohon (Sternkarte) 
(AdM) (.Fohlen. 6/8S) 

HauBhaltabuchfUhrung (AdM) 

Notxwexkanalyae: Ein Programm fux Hobby- 
elokiromknr (AdM) 

PrUfungsfragon (AdM) 

Fit m Utoln mit dom C 64 (AdM) 

Lyrlk-Manchino (AdM) 

Hypra-Platoa (WM) 

Der Chomio Assistent (AdM) 

5MON Toll 3: Ohne gutoi Work* geht ob nicht 
Hypra-A*o(WM) 

Nouoi vom 5MON (* Fohlertoufel 11/85) 
Roasoomblor su Hypra-Aas (. Fchlerioulol I3/B9) 


Bildschirm- 

»Otto 

DPO 

Datei 

Dnickor 


Eutaoüor 

Floppy 


Tlpa ft Tricks tum SMON (inklusive Diskmomtor) 
Außüsung Wettbewerb Blldechlrmoaito 
Droi Tbp-Programmo 
TOrmlnalprogramm dor SplUenklasoe 
(♦Fohlertiiufo) 10/83) 

BMU - Der Maskengonorator (WM) 
Hl-Eddi-Druckorroutinon 
C 64 Schratborllng — Drucken wio gemalt 
KoaUbtldor Forbhardcopy auf Epson JX-00 
Dio nächsten 14 bub d. Einsoilorwotlbowoib 
Hypra-Wad mol 4 (. Fbhlortoufol 3/85) 

DiBkottenmomtor 
Disk-Designer 

Hoisoporation (Hypra-Load ♦ Hypra-Aas * D055.1 ♦ 
Centronics) 

Vior Pseudo-VIC* mit 32 Spnles 
Hi-Eddt: Zeichen- und Molproggramm (WM) 
Eloktrotechnachos Zeichnen mit dem VC 20 
Mini-Grafik VC 30. Grafikhilfe 
Trickfilm mit dom C 64; Bewegle 3D-Grufck (WM) 
(■.Fehlerteufel 6/B5) 

Kurvonplonon mit Hardcopy auf dom C 16 
Doppelte Crafikaußösung für C 120 
Bilder aus einer anderen Dimension (Apfelmännchen) 80 
V1C - das intelligente Programm 
(Wettbewerbssieger) 

Sound Machino (•»Fohlcrtoufol 10/85) 

Sound Master (Base-Erweiterung) 

6510 — Die Suche nach der Prozessor 
Samu ra i (Strategiespiel) 

Schach dem C64'Schachprogramm zum Abtippen 
5piolon auf zwei Bildschirmen: 

ZcichensatsscsoDing (WM) 

Pac-Man unter der Lupe 
Block Out 


Die ScioU-Masehine — D Fenster zur Spielewelt 
(WM) (* Fohlen. 11/85) 

Tiny Förth Compiler (WM) (• Fohlon 9/85) 
TDJtvorarboi- Hypra-Ttan (WM) ( . Fehlcrtoulol 11/55) 
tung Drucksache — Hypra-Huct. Teil 2 

Tips & Tucks Große Buchstaben 

Rostore für Unterprogramme 

Tips ft Tricks Parameternbcigabe an Maschinenspracheprogra 
Curaooleuerung leicht gemacht 
22 Read Error - Thooric und Praxis 
Floppy-Lwtcr ( . Fohlortoufel 4/85) 

Longscreen beim VC 20 

C 16. Help und Trace verbeaacn 

Ordnung ist das halb« Leben (Directory-Sonor) 

Dokumontationshllfc. Ciosa-Rofoiont-Laio C 64 

(Wenboworb) 

Prost mit dem C 64: Gerätes« uerung Uber 
Userpon (+ Fehlertoufcl 9/85) 

Fensior-Bofohle für den C 16 
Elektronische Merkzettel 
Flle-Compactor 

REM-KiUer (»Fehlenoufol 9/85) 


Spiclehilfc 

Sprachen 


Transfer 

Untor- 

programmo 


Komfortable Em-/Ausgaberoutino 
Bildschirmmaaken leicht erstellt 
Der Bitmap-Compander (HiRos-Bilder kompnnuo 
Hypra-Save 

'Procedura' — odor dor C 04 kann lernen 
Aulgewickelt - Llsungscrolbng für VC 20 
Programrogeneratot für den C 64 
Croes-Rof optlmien 
Spiclotrainor Sprllolull 
Tipp-Uulity 

Dor EPROMAutomat (wie man Modulo macht) 
BOZetchen-Grafik für den C 138 
Hyper Scroen (Spntoa auf dem Büdschirmrand) 
Dor C 64 als PET PET-Simulator 
FOrmabono Eingabe 


B2 

01/85 

60 

03/B5 

52 

03/05 

62 

05/85 

62 

07/55 

52 

08/85 

52 

09/85 

52 

10/55 

62 

ll/BS 

50 

11/83 

52 

12/05 

89 

01/B5 

51 

07/85 

87 

10/85 

87 

11/58 

) 96 

ll/BS 

100 

12/85 

188 

09/85 

149 

07/85 

50 

12/85 

69 

06/85 

84 

10/85 

39 

11/85 

187 

01/85 

82 

01/85 

83 

08/85 

70 

09/85 

104 

11/85 

76 

01/85 

50 

01/85 

71 

03/85 

69 

05/85 

51 

05/85 

60 

06/85 

33 

11/85 

) 80 

ll/BS 

173 

05/85 

23 

09/85 

31 

09/85 

70 

05/85 

72 

05/85 

72 

08/8S 

51 

09/85 

76 

10/BS 

64 

11/85 

82 

12/85 

52 

06/BS 

51 

08/85 

50 

10/85 

71 

ll/BS 

89 

01/85 

90 

01/85 

• 80 

01/85 

86 

02/85 

41 

03/85 

82 

03/85 

33 

05/85 

84 

05/85 

77 

0S/8S 

155 

06/85 

76 

06/85 

04 

07/HS 

53 

07/85 

62 

07/B5 

75 

07/85 

74 

07/05 

77 

07/85 

86 

06/85 

Bl 

08/85 

79 

06/85 

78 

06/85 

63 

00/85 

86 

10/85 

83 

10/85 

80 

11/85 

W 

12/85 

90 

12/85 

78 

12/85 

n 

12/85 

Bl 

01/85 

156 

01/85 


Software-Tests 



Annombler 

Assembler Im Ttest Toll 1 

34 

01/85 

Basic- 

GBiiuic - Ailoo ilnn 

SB 

01/85 

Erweiterung 

Macro Baste Dio Unterprogramm-Bibliothek 

137 

06/85 


Darf es etwas mehr aoln? — Tost Buiiness-Baaic 

120 

0B/85 


Das lntellectool 

130 

09/85 


Formel 64 Dao Multitalent 

100 

12/85 

DHJ 

Terminal programmo: Uborstcht 

43 

06/ÖS 

Datoi 

Voiglmchotcot - 7 Datoivnrwaltungen auf einen Blick 118 

07/05 


Aufgeräumt mit Mainfile I! 

157 

10/BS 

Grafik 

Malen auf dom Bildschirm (Malprogrammc) 

34 

08/05 


Crafikpiogrammc auf einen Blick Marktuborsicht 

38 

08/BS 


Vorglotchntoat Grafik Erwettetungen 

37 

09/05 

Lemon 

Softloarmng — die weiche Welle des Lernens 

40 

01/ÖS 


Vokaboltxalmng mit dem Computex 

30 

03/8S 


Maxktuboraicht Lernsoftware 

168 

10/05 

Musik 

Musik fax den C 64: Übersicht Mumksoftwarc 

26 

09/B5 


The Music Systom - Zwei auf einen 5chlag 

164 

12/85 

Sprachon 

Logo - die Sprache fiix Einstoigex 

135 

05/85 


Dor Ada Trntningskurs auf dem C 64 

129 

OS/85 


Pro mal — die neue Sprache fUx Profis? 

124 

07/05 


Foxih-wiira mit M&T-Fonh 64 

126 

07/85 


Was leistet Pilot’ 

121 

08/05 


Pascal filr Profia (Profi-Pancal) 

122 

08/05 


Supet-Fonh 64 

144 

09/35 


den C 64 

140 

09/85 


Basic 7 0 - Das Superbasic dea C 12H 

18 

10/85 


Co mal 80 — die univorecUo Pxogiammioxspracho 

151 

10/85 


Turbo-Pascal auf dem C 138 

30 

11/85 


Die Ausgaben 
2/85 und 4/85 
sind bereits vergriffen 
und nicht mehr lieferbar! 


Am besten gleich 
mitbestellen: 

Die praktischen 
64'er-Sammelboxen 



Sammelboxen! 

Am besten gleich 
mitbestellen! 

Für alle Leser, die »64’er« regel¬ 
mäßig kaufen, sammeln oder im 
Abonnement beziehen, gibt es 
jetzt ein interessantes Ser¬ 
vice-Angebot: die 64’er-Sam- 
melbox! 

Mit dieser Sammelbox bringen 
Sie nicht nur Ordnung in Ihre 
wertvollen Hefte, sondern schaf¬ 
fen sich gleichzeitig ein interes¬ 
santes und attraktives Nach¬ 
schlagewerk. 

Übrigens: Die Sammelbox ist 
nicht nur ein praktisches Aufbe¬ 
wahrungsmittel: Sie eignet sich 
auch hervorragend als Ge¬ 
schenk für Freunde und Be¬ 
kannte zu vielen Anlässen. 


Auch die bisher 
erschienenen Sonderhefte 
können Sie 
jetzt direkt bestellen: 


SONDERHEFT 01/B4i TIM l TRICKS 

Unentbehrliche Anwendungslistings für C 64 und 
VC 20. 

SONDERHEFT 02/85: AIENTEUERSPIELE 1 

Fesselnde Adventures mit tahlieichen Lösungen und 
einem Programmierkurs. 

SONDERHEFT 03/85: SPIELE 

Heiße Listings Für Spiele-Fans und eine große 
Marktübersicht. 

SONDERHEFT 04/S5: GRAFIK t DRUCKER 

Von der 3D-Derstellung bis iur Hardcopy-Routine. 

SONDERHEFT 05/85: F10WT/WU»SETTE 

Soft-Tbols zum komfortablen und noch schnelleren 
Betrieb von Floppy und Datasette. 

SONDERHEFT 06/85: MJSGEWÜHUE SUPER-USTINGS 

Top-Themen aus 64’er bringt eine Auswahl der besten 
64 er Programme. 

SONDERHEFT 07/85: RNWINDUN6EN/DF& 

Leistungsfähige Programme für professionelle 
Anwendungen und Datenfernübertragung. 

SONDERHEFT 08/85: ASSEMBLER 

Assembler-Know-how für Anfänger und Fort¬ 
geschrittene. 

SONDERHEFT 01/86: PC 128 

Komplette Beschreibungen von C 128 und C 128D 
und passendem Zubehör. Die Unterschiede zum C 64. 

SONDERHEFT 02/86: TIPS t TRICKS 

Super-Listings, ausführliche Grundlagen und die 
besten Tips&Tricks und Einzeiler aus 64’er. 

SONDERHEFT 03/86: C16, C116, VC30 UND PIUS 4 

Umfassende Grundlagen und aktuelle Informationen 
zu C16, C116, VC20 und Plus 4. _ 

SONDERHEFT 04/86: ABENTEUERSPIELE 2 

Auf 160 Seiten alles über das Programmieren von 
Abenteuerspielen und Super-Listings zum Abtippen. 

SONDERHEFT 05/86: C64-6RUHDWISSEH 

Für alle Einsteiger um fassende Grundlagen und Hilfe¬ 
stellungen rund um den C64. 

SONDERHEFT 06/86: GRAFIK 

GraEkprogrammierung des C64. C128 und C128 im 
C64-Modus. Dreidimensional konstruieren mit 
aGiga-CADa. 

SONDERHEFT 07/86: PEER« UND POKEi 

Einführungskurs in die wichtigsten Speicherstellen für 
C64. C16 und C128. Über30Seiten Tips&Tricks. 

SONDERHEFT 08/86: PU1S/4 UND C16 

Ausführliche Kurse iur schnelle Programme aufC 16 und 
Plus/4 in Maschinensprache and Basic mit Grafik¬ 
befehlen. 


SONDERHEFT 09: F10PPT 8 DATEIVERWRUUNB 

Dieeffiziente Datenverwaltung für Einsteigerund Profis. 


Tragen Sie die Nummer des gewünschten 
Sonderheftes (z.B. 08/85) auf dem Bestellab¬ 
schnitt der hier eingehefteten Bestell-Zahlkar- 
te ein. 




















































GRUNDLAGEN 


C 128 


ASCII-Codes über $7F einbauen 


Nachdem wir schon im letzten Abschnitt gesehen haben, 
was sich mit den ASCII-Codes kleiner als $80 alles anfangen 
läßt, wollen wir endlich auch die ASCII-Codes größer $7F er¬ 
setzen. 

Zunächst eine kurze Aufstellung der für uns verwendbaren 
Steuerzeichen, deren ASCII-Codes über $7F liegen: 


Steuerzeichen 


ASCII-Code 

orange $81 

= 

#129 

Unterstreichen aus $82 

= 

#130 

<SHIFT+RETURN > $8D 

= 

#141 

Groß-/Grafik-Schrift ein $8E 

= 

#142 

Blinken aus $8F 

= 

#143 

schwarz $90 

= 

#144 

CRSR UP 

= 

Cursor rauf 

$91 

= 

#145 

RVS OFF 

= 

Invers aus 

$92 

= 

#146 

CLR 

= 

Bildschirm löschen 

$93 

= 

#147 

INS 

= 

Zeichen einfügen 

$94 

= 

#148 

braun $95 

= 

#149 

hellrot $96 

= 

#150 

grau 1 $97 

= 

#151 

grau 2 $98 

= 

#152 

hellgrün $99 

= 

#153 

hellblau $9A 

= 

#154 

grau 3 $9B 

= 

#155 

purpur $9C 

= 

#156 

CRSR LEFT 

= 

Cursor links 

$9D 

= 

#157 

gelb $9E 

= 

#158 

türkis $9F 

= 

#159 


Anführungszeichen-Modus beim Interpreter lediglich von der 
Anzahl der offenen Anführungszeichen abhängt. 

Dies machen wir uns mit Hilfe der Steuerzeichensequenz 
$22 OD zunutze. Wenn diese beiden Zeichen - in der 
genannten Reihenfolge - ausgegeben werden, so stellt das 
Byte $22 sowohl das Betriebssystem als auch den Basic- 
Interpreter in den Anführungszeichen-Modus. Das $0D-Byte 
bewirkt dann, daß das Betriebssystem den »quote mode« 
verläßt und somit alle Steuerzeichen, die seine Ausgaberou¬ 
tine erhält, tatsächlich ausgibt (und nicht nur ein inverses Zei¬ 
chen als Symbol für ein Steuerzeichen): die LIST-Routine des 
Basic-Interpreters kümmert sich um das $0D-Byte jedoch 
nicht und wähnt sich nach wie vor im Anführungszeichen- 
Modus. 

Nun geschieht folgendes, wenn ein ASCII-Code wie $93 
ausgegeben wird: 

- Der Interpreter ist im »quote mode« und führt keine Deco¬ 
dierung durch, sondern sendet das Zeichen unverändert an 
die Ausgaberoutine des Betriebssystems. Würde dieses 
auch im »quote mode« stehen - wovon die LIST-Routine 
fälschlicherweise ausgeht -, so würde ein eventuelles Steu¬ 
erzeichen (wie $93 = CLR = Bildschirm-Löschen) nicht aus¬ 
geführt, sondern durch ein inverses Zeichen dargestellt (bei 
$93 ein inverses Herz). 

Beispiele 


- Die Ausgaberoutine des Betriebssystems erhält das Steu¬ 
erzeichen und führt dieses aus, da sie sich seit dem $0D- 
Byte (CR) im Normal-Modus befindet. Dies hat der Interpreter 
aber nicht feststellen können. 

Zugegeben, der Trick ist ziemlich schwer zu verstehen, 
aber d.~‘ür ist die Anwendung wirklich kein Problem. Halten 
wir eintach die Wirkung fest: 

Nach der Sequenz $22 OD werden alle Steuerzeichen, die 
darauf folgen, ausgeführt und weder als Token aufgefaßt (was 
eine Umwandlung in den Klartext zur Folge hätte), noch 
erscheint ein inverses Zeichen als Symbol für das Steuer¬ 
zeichen. 


Laden Sie nun noch einmal das Programm Versuchskanin¬ 
chen, und wir versuchen, den ASCII-Code für »Groß-/Grafik- 
Schrift ein« zu integrieren: 

>01COO 00 24 IC 64 00 8F 8E 22 50... 
oder >1C06 8E eingeben. Natürlich hat der Monitor den 
ASCII-Code korrekt untergebracht, aber beim LISTen wird 
nicht auf Groß-/Grafik-Schrift umgeschaltet, sondern statt- 
dessen erscheint der Basic-Befehl RETURN, der als Token 
den Wert $8E hat. 

Unser Problem ist also, daß der Interpreter beim LISTen 
unsere Steuerzeichen, sofern diese größer als $7F sind, für 
Token hält und somit decodiert - daher der Klartext RETURN. 

Wenn wir unsere Codes in Anführungszeichen setzen, 
erscheint aber ein inverses Zeichen als Symbol für das Steu¬ 
erzeichen. Auch damit können wir nicht zufrieden sein. Den¬ 
noch gibt es einen Ausweg, der mit viel Tüftelei entwickelt 
wurde. 

Der »quote mode« hilft weiter 


Der Interpreter und die Ausgaberoutine des Betriebssystems 
haben beide einen »quote mode« (Anführungszeichen-Mo¬ 
dus), wobei der Interpreter die Zeichen unverändert ans 
Betriebssystem übergibt - auch Werte größer $7F, sofern sie 
in Anführungszeichen stehen. 

Die einzige Lücke ist die, daß beim Betriebssystem der 
»quote mode« durch das Steuerzeichen CR (auch 
<SHIFT+RETURN >) verlassen wird, während der 


Probieren wir es aus: 

>01C38 IC 78 00 8F 22 OD 93 2A 2A... 
oder einfach >1C3C 22 OD 93 eingeben. 

$93 ist der ASCII-Code für CLR/HOME (Bildschirm 
löschen). Nun wird beim LISTen von Zeile 120 der Bildschirm 
gelöscht. Wenn wir aber auch nur einen Teil der Sequenz 22 
OD weglassen, so erscheint entweder der Basic-Befehl 
LOAD (wenn das 22 fehlt) oder ein inverses Herz (wenn das 
OD fehlt, aber das 22 vorhanden ist). 

Dies war ein Beispiel für die Anwendung der Sequenz 
22 OD. 

Wir wollen jedoch fortan die Sequenz 22 14 OD verwen¬ 
den. Das eingefügte 14 ist der ASCII-Code für DEL (DELETE) 
und löscht unverzüglich das Anführungszeichen. In diesem 
Falle (Bildschirm löschen folgt unmittelbar danach) ist es zwar 
unwichtig, aber wenn nicht gerade ein solches Zeichen folgt, 
sollte man darauf achten, daß das Anführungszeichen ver¬ 
schwindet: 

>01C38 IC 78 00 8F22 14 0D93 2A... 
oder >1C3C 22 14 OD 93 eingeben. 

Statt der Sequenz 22 140Distauch22 1B 44 OD möglich, 
wenn nicht nur das Anführungszeichen, sondern die 
gesamte Bildschirmzeile gelöscht werden soll. 

Nun wollen wir aber außer dem 93 auch noch weitere Steu¬ 
erzeichen einbauen, um ein wenig Übung zu bekommen, 
damit Sie auch andere Programme als unser Versuchskanin¬ 
chen manipulieren können. Zwar haben wir alle möglichen 
Codes genannt, besprechen werden wir jedoch nur die wich¬ 
tigsten. 
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Umsdialten auf Groß-/Grafik-Schrift 


Damit beim LISTen der Groß-/Grafik-Zeichensatz eingestellt 
wird, bauen wir das entsprechende Steuerzeichen ein: 
>01C40 8E2A 2A 2A... 
oder >1C40 8E eingeben. 

Nun wollen wir noch das Umschalten mittels 
<SHIFT+CBM> verhindern: 

>01C40 8E0B2A 2A... 

oder > 1C41 OB eingeben. Daran können wir auch eindeutig 
erkennen, daß Steuerzeichen mit ASCII-Codes größer $80 
weiterhin funktionsfähig bleiben (damit wirklich kein Mißver¬ 
ständnis auftritt). 

Die restlichen färben 


Als uns die Sequenz 22 14 OD noch nicht bekannt war, konn¬ 
ten wir nur 4 von 16 Farben über ASCII-Codes einbauen. Hier 
sind die restlichen 12 Codes: 


Farbe 


ASCII-Code 

orange $81 

= 

#129 

schwarz $90 

= 

#144 

braun $95 

= 

#149 

hellrot $96 

= 

#150 

grau 1 $97 

= 

#151 

grau 2 $98 

= 

#152 

hellgrün $99 

= 

#153 

hellblau $9A 

= 

#154 

grau 3 $9B 

= 

#155 

purpur $9C 

= 

#156 

gelb $9E 

= 

#158 

türkis $9F 

= 

#159 


Jeden dieser zwölf Codes auszuprobieren würde nichts 
bringen. Wir arbeiten mit einigen wenigen Beispielfarben, 
denn für eine andere Farbe ist nur ein anderer - obiger Tabelle 
zu entnehmender - Code zu verwenden. 

Wir setzen jetzt den Code für gelb, nämlich $9E, ein: 
>01C40 8E 0B9E2A 2A... 
oder > 1C42 9E. 

An späterer Stelle setzen wir noch die Codes für braun und 
türkis ein, wo wir dann nicht mehr näher darauf eingehen 
müssen. 

Ähnlich wie CR: SHIFT/RETURN 


Nur exemplarisch wollen wir den Code für 
<SHIFT+RETURN > verwenden, denn der CR-Code $0D 
ist viel geeigneter (da er zwar dieselbe Wirkung bei Ausgaben 
hat, aber aufgrund der Tatsache, daß der ASCII-Code $0D 
kleiner als $80 ist, leichter eingesetzt werden kann): 
>01C40 8E OB 9E 8D 8D 2A 2A... 
oder >1C43 8D 8D eingeben. 

Wie gesagt: $8D (SHIFT/RETURN) geht nur nach der 22 
14 OD-Sequenz, $0D (CR) arbeitet auch ohne diese und ist 
leichter zu handhaben. 

Mit RVS OFF reverse und nicht-reverse 
Darstellung in einer Zeile 


Während der ASCII-Code von RVS ON (inverse Darstellung 
ein) bisher verwendbar war, da er mit einem Wert von $12 


kleiner als $80 ist, können wir erst aufgrund der Sequenz 22 
14 OD auf den ASCII-Code von RVS OFF zurückgreifen. 

Natürlich ist der RVS OFF-Code erst sinnvoll, falls er dann 
erfolgt, wenn gerade die reverse Darstellung eingeschaltet 
ist. Daher wollen wir bewirken, daß ein Stern revers und der 
nächste unmittelbar danach nicht-invers ausgegeben wird: 
>01C44 8D 12 2A 92 2A 2A 2A... 
oder einfach >1C45 12 und >1C47 92 eingeben. 

$12 ist der RVS ON-, $92 = # 146 der RVS OFF-Code. 

Als kleine Erweiterung stellen wir nach der RVS-Spielerei 
die aktuelle Zeichenfarbe auf braun: 

>01C44 8D 12 2A 92 2A95 2A 2k... 

Blinkende und nicht-blinkende Zeichen 
in einer Zeile 


Bei den Codes unter $80 haben wir den FLASH ON-Code 
ausdrücklich erwähnt und eingebaut. Er hat den ASCII-Code 
$0F und bewirkt, daß die danach ausgegebenen Zeichen 
blinken - allerdings nur bei Verwendung des 80-Zeichen- 
Bildschirms. 

Das Steuerzeichen zum Ausschalten dieses Blinkens 
bewirkt nicht, daß das Blinken aufhört, sondern nur, daß die 
danach ausgegebenen Zeichen nicht mehr blinken. 

Wir wollen nun einen blinkenden Stern und einen darauffol¬ 
genden, der nicht blinkt, ausgeben lassen: 

>01C48 2A 95 0F2A8F2A 2A 2A... 
oder >1C4A OF 2A 8F 2A eingeben. 

$8F ist der ASCII-Code von FLASH OFF. 

Unterstrichene und nicht-unterstrichene 
.um* Zeichen in einer Zeile 


Ähnlich wie bei den blinkenden Zeichen ist es mit den ASCII- 
Codes $02 (Unterstreichen bei 80-Zeichen-Modus ein) und 
$82 (Unterstreichen aus, geht auch nur bei 80-Zeichen- 
Bildschirm). 

Wir lassen nun einen unterstrichenen und einen nicht- 
unterstrichenen Stern »*« ausgeben: 

>01C4D 2A 02 2A 82 2A 2A 2A... 
oder > 1C4E 02 2A 82 2A eingeben. 

Außerdem ist wieder einmal ein Farbwechsel fällig: 
>01C4D 2A 02 2A 82 2A 9F 2A... 

$9F ist der ASCII-Code für türkis. 

Damit haben wir einige interessante Manipulationen durch¬ 
geführt. Die Anwendung von diesen bleibt Ihrer Phantasie 
überlassen, denn sie ist so vielfältig, daß wir nur die wichtig¬ 
sten Aspekte besprechen müssen. Außerdem ist das Prinzip 
immer wiederkehrend: anstelle eines Füllzeichens (Stern¬ 
chen) wird ein ASCII-Code eingesetzt. Mit ein wenig Experi¬ 
mentieren kommt man ziemlich weit und kann seine Listings 
wirklich interessant gestalten. 

Anwendung der ASCII-Codes auf Maschinen¬ 
programme mit einer Basic-Zeile 


Die ASCII-Codes im Listing sind natürlich vor allem für Basic- 
Programme geeignet. Aber auch bei Maschinenprogram¬ 
men, die eine Basic-Zeile mit einem SYS-Befehl haben, damit 
sie über den Basic-Befehl RUN gestartet werden können, 
kann man mit den ASCII-Codes einiges erreichen. 

So kommen unter anderem folgende Anwendungen, die 
wir auch besprechen wollen, in Frage: 

- Kommentar wie Copyright, Hinweise oder ähnliches aus¬ 
geben 
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C 128 


- SYS-Befehl nach LISTen wieder löschen 

- Cursor auf RUN positionieren, damit der Start bequemer 
ist 

Als Beispielzeile für unsere Manipulationen verwenden wir 
2000 BANK 15:SYS DEC( "41BA") :REM "***#*###*#" 

In der REM-Zeile stehen übrigens 10 Sternchen. 

An der über diese Zeile angesprungenen Adresse steht ein 
RTS-Befehl, Sie müssen also nicht fürchten, daß ein verse¬ 
hentlicher Programmstart zum Absturz führt. 

Als erstes wollen wir, daß anstelle der Zeile nur der Hinweis 
»(C) 128« ausgegeben wird. Dazu suchen wir zunächst das 
Anführungszeichen und die Sternchen über 
H 1C01 5000 

und erhalten als Wert 01C19. 

Jetzt speichern Sie bitte unsere exemplarische Basic-Sys- 
Zeile, denn wir wollen eine kleine Manipulation durchführen, 
die zunächst das Listing der Zeile löscht und dann den Text 
»(C) 128« ausgibt: 

>01C19 JB 44 22 28 43 29 31 32 38 22 07 OA 
Außerdem wird ein Klingelzeichen erzeugt und eine Leer¬ 
zeile eingefügt (durch LF). 1B 44 ist ESC-D, dann kommt der 
Text »(C) 128« und schließlich 07 (das Klingelzeichen) und 
OA (LF). 

Als nächstes wollen wir noch, daß beim LISTen anstelle der 
Zeile der RUN-Befehl erscheint und auf diesem nach dem 
Listen der Cursor steht, damit der Anwender nur noch auf 
< RETURN > drücken muß, um das Programm zu starten. 
Dazu löschen wir die Zeile, geben zweimal CR aus, dann den 


Text RUN und fahren schließlich den Cursor dreimal nach 
oben, damit auch nach der Ausgabe von »READY.« und einem 
CR nach dem Listen der Cursor auf dem RUN steht. Da wir 
den CRSR UP-Code brauchen, muß zudem irgendwo die 
Sequenz 22 14 OD, die wir hier zum Löschen der ganzen 
Zeile durch 22 1B 44 OD ersetzen, stehen: 

>01C19 22 1B 44 ÖD OD OD 52 55 4E 91 £1 El 

Probieren Sie jetzt einmal den LIST-Befehl aus. 

Durch eine solche Änderung kann man es vor allem dem 
Anfänger leichtmachen. 

Natürlich ist es auch - sofern man vorher genügend Füllzei¬ 
chen eingegeben hat - möglich, andere Befehle als RUN vor¬ 
zubereiten. 

Damit wären wir am Ende unseres Kurses angekommen. 
Wir hoffen, es hat Ihnen Spaß gemacht und neue Möglichkei¬ 
ten eröffnet. Ganz abgesehen davon, daß wir nun den Moni¬ 
tor wirklich beherrschen und für Basic- und Maschinenpro¬ 
gramme bestens einsetzen können, haben wir uns auch 
nebenbei elementare Kenntnisse angeeignet: Sie können 
nun mit den wichtigsten Zahlensystemen umgehen, wissen 
über die Speicherstruktur Bescheid und kennen den Aufbau 
eines Basic-Programms im Speicher. 

Wenn Sie jetzt andere Literatur lesen und vor allem verste¬ 
hen wollen, so fällt es Ihnen auf jeden Fall leichter. Auch wenn 
Sie vorher nicht mit Maschinensprache weit gekommen sind, 
sollten Sie es jetzt noch einmal versuchen; mittlerweile geht 
es sicherlich viel besser. 

(F. Müller/ks) 
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Wunderweh der Grafik 


Das Basic des C128 verfügt über wunderbare 
Befehle zur Nutzung der HiRes-Grafik. Wir zeigen 
Ihnen Anwendung und Programmierung dieser 
HiRes-Grafik. 

H ier geht es um die hochauflösende und die Mehrfarben¬ 
grafik, die wir uns im Detail ansehen werden. 14 
Befehle steuern im Basic 7.0 des CI28 die Grafik¬ 
möglichkeiten im engeren Sinn. Zählt man noch die Sprite- 
und Shapeanweisungen hinzu, dann verfügen wir über 27 
grafische Werkzeuge in Basic. Wir erklären Ihnen die Anwen¬ 
dung und Programmierung jedes einzelnen dieser 14 
Befehle, die Ihnen das Arbeiten mit der hochauflösenden 
Grafik erleichtern. 

GRAPHIC 


Dieser Befehl dient - der Name sagt es schon - zum 
Umschalten in die verschiedenen Grafik- und Textmodi unse¬ 
res Computers. Mittels 
GRAPHIC A, B, C 

können je nach den Kennungen A, B und C eine ganze Reihe 
von Optionen angewählt werden. 

Die Kennung A aktiviert den Grafik-Modus: 

A=0 Der Textbildschirm - und zwar derjenige mit 40 Zei¬ 
chen Zeiienbreite - wird eingeschaltet 
A=1 Die hochauflösende Grafik wird aktiviert 
A=2 Ein »Splitscreen«, also ein Bildschirm, auf dem 
sowohl 40-Zeichen-Text als auch hochauflösende Grafik 
zulässig sind, kann damit eingeschaltet werden 
A=3 Die Mehrfarbengrafik (auch Multicolorgrafik genannt) 
ist angewählt 

A=4 Auch dieser Parameter erlaubt die Einrichtung eines 
Splitscreen. Diesmal erscheint zum 40-Zeichen-Text-Schirm 
noch die Mehrfarben-Grafik 
A=5 Schaltet auf 80 Zeichen um. 

Der Parameter B entscheidet darüber, ob der ausgewählte 
Bildschirm gelöscht wird oder nicht: 

B=0 Es wird nicht gelöscht 

B=1 Der Bildschirm (in den Grafik-Modi 1 bis 4 auch die 
Bit-Map genannt) wird gelöscht. 

Der Parameter C spielt lediglich in den Modi 2 und 4 eine 
Rolle (Splitscreen). Er bestimmt, an welcher Zeile der Text¬ 
bildschirm eingeblendet werden soll. Die Splitscreens sind 
so eingerichtet, daß immer von dieser Zeile an abwärts Text¬ 
bereich existiert. Voreingestellt - und daher muß C nicht 
immer angegeben werden - ist die Zeile 19. 

Worin unterscheiden sich diese Grafik-Modi? Wenn Sie im 
C 64-Modus Grafik programmieren wollen, dann kommen Sie 
ohne einen sehr tiefen Einblick in die Speicherorganisation 
des Computers nicht sehr weit. Auch wenn uns das der C128 
durch sein leistungsfähigeres Basic erspart: Ein wenig soll¬ 
ten Sie dennoch wissen. 

Die Grafik-Modi 


40-Zeichen-Text 

Zur Darstellung des 40-Zeichen-Bildschirms belegt der 
Computer zwei Speicherbereiche: 

1024 bis 2023 Bildschirm-RAM und 
55296 bis 56295 Bildschirm-Farben-RAM 


In jeweils 1000 Speicherstellen (40 Spalten mal 25 Zeilen) 
befindet sich die Text-Information, die auf dem Monitor oder 
Fernseher zu sehen ist. Die Aufteilung dieser beiden Spei¬ 
cherbereiche finden Sie in Ihrem Handbuch auf den Seiten 
5-80 und 5-82. Wenn Sie dafür sorgen, daß in der linken obe¬ 
ren Ecke Ihres Bildschirms ein A steht, dann finden Sie durch 
BANK 0:PRINT PEEK(1024) 

die Zahl 1 in der Speicherstelle 1024. Das ist der Bildschirm- 
Code des Zeichens »A«. Umgekehrt können Sie durch 
POKEn auch Zeichen in den Bildschirmspeicher schreiben: 
BANK 0:P0KE 1025,2 

schreibt ein »B« an die zweite Position der ersten Zeile. Im 
Handbuch sind die Bildschirm-Codes der Zeichen zu finden. 
Der andere Speicherbereich ab 55296 versieht die Zeichen 
mit Farbe. In den alten Versionen des C64 mußten zwei 
POKEs eingegeben werden, um ein Zeichen sichtbar wer¬ 
den zu lassen. Der zweite POKE diente zum Einschreiben 
eines Farb-Codes in die dazugehörige Bildschirmfarbspei- 
cherstelle. Hier ist das nicht nötig: Der Speicherbereich ab 
55296 wird automatisch mit entsprechenden Werten gefüllt: 
Die unteren 4 Bit enthalten nach dem Einschalten die Zahl 13, 
was dem Code der Farbe hellgrün (vermindert um 1) ent¬ 
spricht. Es steht Ihnen aber frei, bunte Buchstaben zu erzeu¬ 
gen. Dazu ist lediglich ein anderer Farb-Code in die zum Bild¬ 
schirmspeicher gehörige Farbzelle zu schreiben. Bild 1 soll 
dieses Zusammenspiel beider Speicherbereiche verdeutli¬ 
chen: 

Übriqens, falls Ihnen die aktuelle Cursorfarbe nicht mehr 
gefalle;. . iollte, dann können Sie sie durch 
BANK 0:P0KE 24l,Farbcode 

ändern. Auch alle danach geschriebenen Zeichen erhalten 
die so gewählte neue Farbe. 



Bild 1. Ein Zeichen auf dem Bildschirm setzt sich aus der 
Bildschirm- und der Farbinformation zusammen 


Nun wissen wir zwar, daß zum Darstellen eines Zeichens 
auf dem Bildschirm ein Zeichen-Code im Bildschirmspeicher 
und ein Farb-Code im dazugehörigen Farbspeicher nötig 
sind, so ganz befriedigend ist das als Erklärung aber noch 
nicht. Woher weiß unser Computer eigentlich, was er abbil¬ 
den soll, wenn beispielsweise der Zeichen-Code 1 in der 
Speicherstelle 1024 steht? Für jedes Zeichen, das der Com¬ 
puter darstellen kann, gibt es im sogenannten Character- 
ROM ein Muster. Der Zeichen-Code dient als Zeiger auf das 
erste Byte eines solchen Musters. Die 1 deutet auf das erste 
Zeichenmuster, das zum großen Buchstaben »A« gehört. Es 
gibt übrigens auch das nullte Zeichen, den »Klammeraffen«. 
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Bild 2. Das Zeichenmuster des Buchstaben A 


Jedem Zeichen sind im Character-ROM 8 Byte zugeord¬ 
net. Ein Beispiel zeigt Bild 2. 

Daraus ist zu ersehen, daß jedes Zeichen als gesetzte oder 
nicht gesetzte Punkte in einem 8x8-Rasterfeld definiert ist. 
Falls Sie über einen guten Monitor verfügen und Kontrast 
sowie Helligkeit entsprechend einstellen, dann können Sie 
diese Punkte auch auf dem Bildschirm erkennen. 

Zwei Fragen stellen sich aus dieser Erkenntnis heraus: 

- Kann man eigene Zeichen erstellen und verwenden? 

- Gibt es eine Möglichkeit, statt jeweils auf solch ein 8x8- 

Raster auch auf einzelne Punkte einzuwirken? 

Die erste Frage wird im Abschnitt über den VIC-Chip beant¬ 
wortet. Hier sei nur erwähnt, daß es möglich ist. 

Die zweite Frage führt uns zu den anderen Grafik-Modi. 
Der Hochauflösungsmodus 

Wir hatten festgestellt, daß wir im Textmodus (40 Zeichen) 
immer nur (beispielsweise durch POKE 1024,1) auf ein 8x8- 
Punkte-Raster zugreifen können. Die Auflösung unseres 
Bildschirms beträgt in diesem Zustand 40 x 25 Zeichen. Es 
gibt noch einige Tricks, eine sogenannte Viertelpunktgrafik 
zu entwerfen, in der die auf der Tastatur vorgegebenen Gra¬ 
fikzeichen (beispielsweise mit <CBM+C> zu erhalten) 
geschickt verwendet werden. Es juckt aber in den Fingern, 
jeden Bildpunkt eines solchen 8 x 8-Zeichens einzeln anzu¬ 
sprechen. Das ist tatsächlich mittels dem Grafikmodus 1 (und 
auch 2) möglich, der durch GRAPHIC1 anwählbar ist. Damit 
erhöht sich die Auflösung ganz erheblich: 

320 horizontale und 200 vertikale Bildschirmpositionen 
stehen uns hier zur Verfügung. Wir haben den sogenannten 
Bit-Map-Modus eingeschaltet. 

Das Prinzip ist dabei folgendes: Jedem Bildpunkt ent¬ 
spricht ein Bit eines Speicherbereiches, der Bit-Map. Ist in 
dieser Bit-Map ein Bit gleich 1, dann erscheint an der dazuge¬ 
hörigen Bildschirmposition ein Punkt (das ist wie das Einträ¬ 
gen von Geländeeinzelheiten in eine Landkarte, daher der 
Name Map = Landkarte). Jeweils 8 Bit ergeben ein Byte, 
woraus sich auf die Größe der Bit-Map schließen läßt: 
(320*200)/8 = 8000 Byte. 

Alles, was auf dem Bildschirm erscheint, ist der Inhalt die¬ 
ser Bit-Map, die durch den GRAPHICI-Befehl eingerichtet 
wird. Wo befindet sie sich? Wenn Sie sich mal vor und nach 
dem Einrichten der Bit-Map durch PRINT FRE(O) den freien 
Speicherplatz ausgeben lassen, dann erkennen Sie folgen¬ 
des: In der BANK 0, also dem Basic-Textspeicher, wird eini¬ 
ges verändert. Normalerweise (also ohne Bit-Map) beginnt 
der Basic-Text in Speicherstelle $1C00 (dezimal 7168). 
GRAPHIC1 schiebt den Textstart (und ein eventuell schon im 
Speicher befindliches Programm) in Windeseile bis $4000 
(dezimal 16384). Die Bit-Map beginnt ab $2000 (dezimal 
8192). 


GRAPHIC1 legt aber nicht nur eine Bit-Map an und schaltet 
den Videochip auf den speziellen Grafikmodus um, sondern 
definiert auch ein Koordinatensystem auf dem Bildschirm, 
das sich aus der Bit-Anordnung des Bildes ergibt. Sehen Sie 
dazu das Bild 3. 

Wir finden einen Koordinatenursprung in der linken oberen 
Bildecke, eine nach unten weisende Y-Achse und eine nach 
rechts verlaufende X-Achse: Ein solches linkshändiges 
System bereitet dem Anwender manchmal einige Probleme, 
weil in der Mathematik ein rechtshändiges System eingesetzt 
ist (da wäre dann der Ursprung unten links zu finden und die 
Y-Achse verliefe nach oben). Alle Zeichenbefehle beziehen 
sich im Normalfall auf die so festgelegten Koordinaten. Ein 
Befehl 

DRAW 1,0,0 TO 319,199 

(zu den Einzelheiten kommen wir noch) zeichnet also eine 
Linie von links oben nach rechts unten. 

Wir haben noch nicht erwähnt, wie der Computer die Far¬ 
ben in diesem Modus festlegt. Das soll beim COLOR-Befehl 
behandelt werden. Auf Koordinatensysteme kommen wir 
beim SCALE-Befehl noch einmal zurück. 

Die Mehrfarbengrafik 

Während in den Grafik-Modi 1 und 2 jedes gesetzte Bit in 
der Bit-Map einen Bildpunkt nach sich zieht, ist die Mehrfar¬ 
bengrafik (Modi 3 und 4) immer auf Bit-Paare orientiert. Die 
Bit-Map hat zwar als Karte des Bildschirminhaltes ihre Bedeu¬ 
tung beibehalten, aber sie wird vom VIC-Chip nun anders 
gelesen. Es existieren vier Möglichkeiten von Bitkombinatio¬ 
nen zu je zwei Bit: 

00 Hintergrund 
01 Farbe 1 

10 Farbe 2 

11 Farbe 3 

Auf welche Weise welche Farbe angesprochen wird, soll 
uns beim COLOR-Befehl weiter beschäftigen. Hier interes¬ 
siert uns die Auswirkung auf die Auflösung. 

Weil in der X-Richtung nun nur noch Bit-Paare zählen, hal¬ 
biertsich die Auflösung. Das Koordinatensystem der Multico- 
lorgrafik ist ebenso aufgebaut wie das der hochauflösenden 
Grafik, lediglich in X-Richtung stehen uns nur noch 160 Posi¬ 
tionen zur Verfügung. Bild 4 zeigt uns dieses neue Koordina¬ 
tensystem. 

Die Splitscreens 

In den Grafik-Modi 2 und 4 wird der Bildschirminhalt durch 
jeweils zwei verschiedene Betriebsarten des VIC-Chip 
gewonnen. Im oberen Teil sehen wir den Inhalt der Bit-Map, 
im unteren aber 40-Zeichen-Text. Dies wird erreicht durch die 
sogenannte Rasterzeilenunterbrechung. Auch im C64- 
Modus kann mittels eines Maschinenprogramms diese Auf¬ 
teilung des Bildschirms programmiert werden. Dabei gab es 
immer ein Problem, das mit der Bearbeitungszeit zusammen- 



Bild 3. Das Koordinatensystem im HiRes-Modus 
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hing. Die Rasterzeilenunterbrechung und die normale Unter¬ 
brechung (die 60mal pro Sekunde stattfindet) durften sich 
nicht gegenseitig in die Quere kommen. Diese Schwierigkeit 
konnte im Programmbetrieb meistens ganz gut gelöst wer¬ 
den. Im Direktmodus führten aber Cursorbewegungen und 
die Arbeit mit Sprites oft zu einer zittrigen Grenze der beiden 
Darstellungsmodi auf dem Bildschirm. Dasselbe Problem 
scheint im C128-Modus dafür verantwortlich zu sein, daß 
diese Grenze manchmal geradezu extrem gestört wird, bei¬ 
spielsweise beim Steuern von Sprites über die Splitscreen- 
grenze im Grafikmodus 4. 

Beim Einschalten eines Splitscreen befindet sich der Text¬ 
cursor nicht automatisch im Textbereich. Er muß erst dorthin 
gefahren werden. Zwei Möglichkeiten bieten sich hier an: 
Zum einen kann ein PRINT AT simuliert werden durch: 

BANK 15:SYS 65520,,Zeile,Spalte 
Zum anderen bietet sich die Definition eines Bildschirmfen¬ 
sters unter Benutzung des WINDOW-Befehls an. Man legt 
dann einfach den gesamten Textbereich als WINDOW fest. 
Ist also keine spezielle Trennzeile angegeben worden (dann 
tritt der Übergang von Grafik zu Text in Zeile 19 ein), kann das 
durch 

WINDOW 0,20,39,24 

geschehen. Übrigens bleibt das Bildschirmfenster auch 
nach einer Rückkehr in den Textmodus erhalten. Wird das 
nicht gewünscht, kann durch 
WINDOW 0,0,39,24 

der gesamte Bildschirm wieder benutzt werden. 


Der 80-Zeichen-Textmodus 


Sollten Sie stolzer Besitzer eines 80-Zeichen-Monitors sein, 
dann können Sie durch GRAPHIC5 die Textausgaben auf 
dessen Bildschirm lenken. Interessanterweise ist es nun 
möglich, zwei getrennte Anzeigen zu erhalten, beispiels¬ 
weise die Multicolorgrafik auf dem 40-Zeichen-Schirm und 
die Textausgaben auf dem 80-Zeichen-Monitor. Die 
Splitscreen-Optionen braucht man dann nicht mehr - sie sind 
sogar hinderlich, weil sie die Ausgabe von Text wieder auf 
den 40-Zeichen-Schirm lenken und uns die Mühe machen, 
den verringerten Grafikausgabebereich zu berücksichtigen 
(die Y-Achse wird ja nun ab Zeile 19 überdeckt vom Textbe¬ 
reich). 

Die Textdarstellung auf dem 80-Zeichen-Schirm folgt etwa 
dem gleichen Prinzip, wie wir es schon beim 40-Zeichen-Text 
kennengelernt haben - mit folgenden Unterschieden: 

Zunächst benutzt unser Computer jetzt einen anderen 
Videobaustein, den VDC 8563. Wir werden diesen Video¬ 
chip an anderer Stelle noch etwas genauer kennenlernen. 


Bit: 

7 

6 

5 

4 

3 
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0 

Name: 

ALT 
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UL 

FL 

R 

G 

B 

1 



Bild 4. Das Koordinatensystem im Multicolor-Modus 


Bild 5. Aufbau eines Attribut-RAM-Byte 

Der Bildschirmspeicher ist nirgendwo im Bereich der 128 
KByte unseres Computers zu finden, die wir direkt anspre¬ 
chen können (durch PEEK oder mittels Monitor). Ebensowe¬ 
nig werden wir einen Hinweis auf den Farbspeicher finden. 
Woran liegt das? Immerhin brauchen wir doch 80 x 25 Byte, 
also 2000 für das Bildschirm-RAM und ebenso viele Byte für 
die Farbzellen. Da sind wir auf eine Besonderheit des VDC- 
Chip gestoßen: Er benutzt einen eigenen 16-KByte-RAM- 
Bereich, der völlig getrennt vom normalen Speicher existiert 
und von uns nur über zwei Speicherstellen ansprechbar ist. 
Welche das sind und wie man sie benutzt, soll ebenfalls beim 
VDC besprochen werden. Hier nur die Aufteilung dieses 
Speichers: 

0000 bis 2047 Bildschirm-RAM 
2048 bis 4095 Attribut-RAM 
4096 bis 8191 frei 
8192 bis 16385 Zeichenspeicher 

Zur Bedeutung des Bildschirm-RAM braucht nichts mehr 
gesagt zu werden. Das Attribut-RAM entspricht etwa dem 
Bildschirmfarbspeicher, birgt aber noch mehr Möglichkeiten 
in sich. Weil wir alle Aspekte der Farbgebung der anderen 
Modi beim COLOR-Befehl behandeln werden, mit diesem 
Befehl aber das VDC-Attribut-RAM nicht erschöpfend erfaßt 
werden kann, soll hier diese VDC-Spezialität erklärt werden. 
Zuvor noch ein paar Worte zum Zeichenspeicher. Während 
im 40-^.'chen-Textmodus ein Zeichenmuster aus dem Cha- 
racter-ROM entnommen wird, ist das im 80-Zeichen-Text¬ 
modus nicht der Fall. Vielmehr findet hier schon in der Ein¬ 
schaltphase ein Kopieren aller Zeichen in den speziellen 
VDC-RAM statt. Von dort stammen nun auch die Zeichen¬ 
muster. Sie kennen sicher schon die Erscheinung, daß bei¬ 
spielsweise beim Umschalten auf den DIN-Zeichensatz (mit 
der < CAPS/LOCK > -Taste) einige Zeit verstreicht, bis alle 
Zeichen im neuen Gewand zu sehen sind: Das liegt daran, 
daß der gesamte Zeichensatz umkopiert werden muß. Im 
Bereich 8192 bis 16385 finden sich danach nur noch die 
DIN-Zeichenmuster. 

Es wird sicher Ihrer Aufmerksamkeit nicht entgangen sein, 
daß hier die Rede von RAM ist im Gegensatz zum Zeichen- 
ROM, das bei der 40-Zeichen-Textdarstellung eine Rolle 
spielt. Wenn wir wissen, wie man dieses VDC-RAM anspre¬ 
chen kann, wird uns nichts daran hindern, auch in den Spei¬ 
cherbereich des Zeichensatzes hineinzuschreiben. So kön¬ 
nen dann eigene Zeichen definiert werden. 

Kommen wir nun aber zurück zum Attribut-RAM. Jeder 
Bildschirmspeicherstelle entspricht ein Byte dieses Attribut¬ 
bereiches. Durch dieses Byte aber wird noch mehr gesteuert 
als die Farbe, was Sie am Aufbau solch einer Speicherstelle 
erkennen können (siehe Bild 5). 

Die Bits 0 bis 3 bestimmen die Farbe, was wir gleich noch 
untersuchen wollen. 

Bit 4: Ist hier eine 1 zu finden, dann blinkt das Zeichen. 

Bit 5: Das Zeichen ist unterstrichen, wenn hier eine 1 ent¬ 
halten ist. 

Bit 6: Hiermit wird ein Aspekt der Zeichendarstellung »dop¬ 
pelt gemoppelt«: Die Revers-Darstellung. Eigentlich kann 
nämlich durch Einschreiben einer »1« an diese Stelle genau 
dasselbe erreicht werden, wie durch das ansonsten etwas 
speicherfressende Verfahren eines gesonderten Zeichen¬ 
musters, mit dem momentan die inversen Zeichen gezeich¬ 
net werden. 
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0 

0 

1 
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1 
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0 
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0 
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1 

0 

10 

lila 
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0 

1 

1 
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0 

12 

braun 
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1 

1 

0 

1 
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gelb 
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1 

1 

0 
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1 

1 

1 

1 

15 

weiß 
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Bild 6. Zuordnung der Bit-Kombinationen zu den Farben 
(stark vom verwendeten Monitor abhängig!) 

Bit 7: Im Gegensatz zum 40-Zeichen-Textmodus, der die 
Groß- und Kleinschreibung nur durch Umschalten (per 
<CBM+SHIFT>-Taste) erlaubt, können im 80-Zeichen- 
Modus beide Zeichensätze gleichzeitig verwendet werden. 
Welches von den beiden möglichen Zeichen auf dem Bild¬ 
schirm zu sehen ist, entscheidet dieses Bit. Liegt hier eine 1 
vor, dann stammt das sichtbare Muster aus dem zweiten Zei¬ 
chensatz. 

Nun zu den Farb-Bits. Im Bild 5 sind diese mit R, G, B und 
I bezeichnet. Dabei steht R für Rot, G für Grün, B für Blau und 
schließlich I für Intensität. Je nach Mischung der Signale, die 
durch unterschiedliche Bitbelegungen der vier Bit erzeugt 
werden, ergeben sich die 15 möglichen Farbdarstellungen. 
Bild 6 zeigt alle Kombinationen. 

All diese einzelnen Aspekte, die das Attribut-RAM erlaubt, 
können durch CHR$- oder/und ESC-Befehle angesteuert 
werden. So erzeugt 
PRINT CHR$(2)"A" 
ein unterstrichenes und 
PRINT CHR$(27)+"F";"A" 

ein blinkendes A. Das Handbuch gibt ab Seite 4-4 erschöp¬ 
fend darüber Auskunft. 

Eine kleine Besonderheit ist allerdings vergessen worden: 

Falls Sie einmal <CTRL+S> drücken, während ein Pro¬ 
gramm läuft, hält dieses sofort an. Damit haben wir eine Pau¬ 
sentaste im Computer. Erst nach einem beliebigen anderen 
Tastendruck arbeitet der Computer weiter. 

GRAPHIC CLR 

Eine Version des GRAPHIC-Befehls wurde Ihnen bisher 
noch verschwiegen. Mit GRAPHIC CLR führen Sie den Com¬ 
puter wieder in den reinen Textmodus zurück. Sie werden 
sagen, daß dazu doch die Befehle GRAPHICO oder 
GRAPHIC5 ausreichen. Das stimmt aber nur in Grenzen. 
Falls einmal einer der Grafik-Modi 1 bis 4 eingeschaltet 
wurde, damit also der ganze Speicher in BANK 0 verändert 
ist, bleibt die Bit-Map und der Basic-Start bei $4000 erhal¬ 
ten. Das erkennen Sie beispielsweise daran, daß - falls Sie 
nicht mit einer der Löschfunktionen das Bitmuster gelöscht 
haben - durch beispielsweise GRAPHIC1 auf dem Bild¬ 
schirm immer noch das Grafikbild auftaucht, das Sie vorher 
einmal erstellt haben. 

Erst durch den Befehl GRAPHIC CLR krempeln Sie die 
BANK 0 unseres Speichers wieder völlig um. Der Basic-Start 
wandert wieder nach $1C00, die Bit-Map wird überschrie¬ 
ben. 


COUOR 


Wir kommen nun zur Farbgebung in den verschiedenen 
Modi. Im Befehl 

COLOR A,B 

bedeutet A das folgende: 

A=0 Hintergrund im 40-Zeichen-Textmodus und in den 
Grafik-Modi. 

A=1 Vordergrundfarbe in den Grafik-Modi. Im Multicolor- 
modus wird damit die Farbe der Bitkombination 01 belegt. 

A=2 Multicolorfarbe 1. Das betrifft die Farbe der Bit- 
Kombination 10. 

A=3 Multicolorfarbe 2, die sich auf die Bitkombination 11 
bezieht. 

A=4 Farbe des Bildschirmrahmens. 

A=5 Zeichenfarbe im Textmodus. Damit wird sowohl im 
40- als auch im 80-Zeichen-Text die Zeichenfarbe bestimmt. 

A=6 Hintergrund des 80-Zeichen-Bildschirms. 

B ist der Farbcode. Je nach Fabrikat, eingestelltem Kon¬ 
trast, Helligkeit und anderen Gerätespezifica variiert die dar¬ 
gestellte Farbe. Der Code und die angegebenen Farben die¬ 
nen daher eher als ungefährer Richtwert. Bild 7 zeigt die 
Zuordnung der verschiedenen Werte. 

Sehen wir uns nun die Farbgebung etwas genauer an: 

Die Farbspeicher 

Sowohl einzelne Speicherstellen als auch größere RAM- 
Bereiche spielen eine Rolle bei der Farbzuordnung. Einen 
RAM-Bereich haben wir schon beim Textmodus erwähnt: 
Den Bildschirmfarbenspeicherzwischen 55296 und 56295 
($D800 bis $DBE7). Anders als beim VDC-Attribut-RAM 
spielen hier nur die Bits 0 bis 3 eine Rolle. Die oberen 4 Bit 
sind unbenutzt und unterliegen einem ständigen Wandel. 
Versucnen Sie einmal mittels Monitor und dem Kommando 
»M FD800« mehrmals hintereinander in dieses Farb-RAM zu 
sehen. Im Einschaltzustand finden Sie allerlei Werte zwi¬ 
schen $0D und $FD, denen aber allen das niederwertige 
Nibble $D eigen ist. 

Als weiterer RAM-Bereich liegt - bisher noch nicht erwähnt 
- in den Grafik-Modi 1 bis 4 ein Farbspeicher für die Bit-Map 
vor, der von 7168 bis 8167 ($1C00 bis $1FE7) reicht. Paral¬ 
lel zur Einrichtung der Bit-Map sorgen die GRAPHIC-Befehle 
auch für die Zuordnung dieses Farb-RAM. Wie Sie sehen, 
enthält der Farbspeicher lediglich 1000 Byte Speicherplatz. 
Die Farbzuordnung geschieht also weiterhin wie im Textmo¬ 
dus, nämlich Pixel für Pixel (wobei jedes Pixel in der Form des 
8 x 8-Rasters gehandhabt wird). So können Sie zwar auch im 
Hochauflösungsmodus in verschiedenen Farben auf den 
Bildschirm zeichnen (einfach, indem COLOR1 vor dem Zei¬ 
chenbefehl eine andere Farbe erhält), sobald aber die Zeich¬ 
nung genügend dicht an eine andere heranreicht, wechselt 
an der Stelle das gesamte Pixel seine Farbe, also auch der 
darin verlaufende Teil der alten Zeichnung. 

Der Aufbau der einzelnen Bytes dieses RAM-Bereichs 
hängt von der Art des eingeschalteten Grafikmodus ab. In der 
Hochauflösungsgrafik enthält das LSN (das sind die Bits 0 bis 
3, also das untere Nibble) einen Code für die Hintergrund- 
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Bild 7. Farben und Code-Nummern 
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färbe, wohingegen das MSN (die Bits 4 bis 7, das obere 
Nibble) den Code für die Vordergrundfarbe darstellt. Der ver¬ 
wendete Code ergibt sich jeweils aus dem Farbcode (vorhin 
als B bezeichnet) minus 1. 

Im Mehrfarbenmodus dagegen finden wir im LSN die Multi¬ 
colorfarbe 1 (als Farbcode-1). Das MSN bleibt unverändert. 

Übrigens ist dieser Inhalt des Farb-RAM erst dann vorhan¬ 
den, wenn auf irgendeine Weise ein Löschvorgang stattge¬ 
funden hat, beispielsweise durch GRAPHIC1.1. Vorher - also 
dann, wenn dieser Speicher lediglich durch GRAPHIC1 ein¬ 
gerichtet, aber nicht gelöscht wurde - können Sie dort nur 
wirres Byte-Durcheinander erkennen, falls Sie sich mittels 
dem Monitorkommando M den Speicherbereich ansehen. 

Zwei Speicherstellen in der PAGE 3 korrespondieren mit 
dem eben vorgestellten Farb-RAM: 

$3E2 (dezimal994) FG-BG 
$3E3 (dezimal995) FG-MC1 

FG-BG hängt mit der hochauflösenden, FG-MC1 mit der 
Multicolorgrafik zusammen. Im Einschaltzustand finden wir in 
diesen beiden Speicherzellen: 

$3E2: $DB = bin.1101 1011 
t t 

13 / 11 

h'grün-l /d'grau-l 
Vordergr./Hintergr. 

$3E3: $D1 = bin.1101 0001 
t \ 

13/1 

h'grün-l / weiß -1 
Vordergr./Multicolorl 

Mit diesen Werten wird das Farb-RAM belegt, sobald ein 
Grafikmodus 1 bis 4 eingeschaltet wird und ein Löschvor¬ 
gang stattfindet. Sobald aber durch einen COLOR-Befehl 
andere Farben gewählt werden, drückt sich diese Änderung 
in diesen beiden Speicherstellen aus, und der nächste 
Löschvorgang belegt das Farb-RAM mit dem Inhalt der ent¬ 
sprechenden Speicherstelle. 

Da ergibt sich allerdings ein Problem: Nehmen wir an, wir 
hätten den Grafikmodus 1 eingeschaltet und wollen nun in 
den Multicolormodus (3) umschalten. Das ist zwar ohne wei¬ 
teres möglich, aber die Farben werden erst dann umgeschal¬ 
tet (also das Farb-RAM erst dann mit dem Code aus $3E3 
belegt), wenn ein Löschvorgang stattgefunden hat. Dann ist 
aber auch die Bit-Map gelöscht! Diese Schwierigkeit kann auf 
einigen Umwegen gelöst werden. Wie, das werden wir nach¬ 
her noch sehen. 

Vier Zeropage-Speicherstellen spielen in der Farbgebung 
eine wichtige Rolle: $83 bis $86 (dezimal 131 bis 134): 
$83 COLSEL aktuelle Farbe 
$84 MULTICOLOR1 Multicolorfarbe 1 
$85 MULTICOLOR2 Multicolorfarbe 2 
$86 FOREGROUND Vordergrundfarbe 

Im Einschaltzustand findet man in $83 den Wert 0, in $84 
eine 1 (also Farbcode von weiß-1), in $85 steht 2 (das ist 
rot-1) und in $86 liegt D (13, was hellgrün-1 bedeutet). 

COLSEL enthält nach jedem Grafikbefehl die darin angege¬ 
bene Farbquellenziffer (die wir noch kennenlernen). 

Aus dem C 64-Modus sind Ihnen zwei Speicherstellen des 
VIC-Chip sicher bekannt: 

$D020 dezimal 53280 Rahmenfarbe 
$D021 dezimal 53281 Hintergrundfarbe 

Auch im C128-Modus haben die Speicherstellen diese 
Bedeutung. Im Einschaltzustand finden wir die Farben im 
LSN: 

$D020 enthält $FD = binär 1111 1101 
hellgrün-1 

$D021 enthält $FB = binär 1111 1011 
dunkelgrau-1 



Nun kennen wir die beteiligten Speicher. Welche Auswir¬ 
kungen hat der COLOR-Befehl? 

Fassen wir die bis jetzt gewonnenen Erkenntnisse zur 
Farbgebung der Grafikbildschirme zusammen: 

COLOR 0,X belegt den Hintergrund mit der Farbe X. Die 
Bits 0 bis 3 von $3E2 enthalten den Wert X-1. 

Die Bits 0 bis 3 von $D021 werden ebenfalls mit X-1 
beschrieben. 

COLOR 1,X bestimmt die grafische Vordergrundfarbe. In 
$86 erscheint X-1. 

Die Bits 4 bis 7 der Speicherstellen $3E2 und $3E3 ent¬ 
halten danach X-1. 

COLOR 2,X legt die Multicolorfarbe 1 fest. $84 hat nun X-1 
zum Inhalt. 

In den Bits 0 bis 3 der Speicherstelle $3E3 befindet sich 
ebenfalls X-1. 

COLOR3.X bestimmt die Multicolorfarbe 2. In $85 befindet 
sich danach der Wert X-1. 

Schließlich wird bei eingeschaltetem Grafikmodus 1 bis 4 
durch einen Löschvorgang der Speicherbereich $1C00 bis 
$1FE7 (dezimal 7168 bis 8167) beschrieben mit 

- dem Inhalt von $3E2 bei den Modi 1,2 

- oder dem Inhalt von $3E3 in den Multicolor-Modi 3 und 4. 

Wir werden nun ausprobieren, welche Bitpaarkombination 

welcher Farbe im Multicolormodus entspricht. Dazu schrei¬ 
ben wir an den Anfang der Bit-Map drei Zahlen, die diese drei 
möglichen Kombinationen repräsentieren: 
binär 1111 1111 = dezimal 255 (Kombination 11) 
binär 1010 1010 = dezimal 170 (Kombination 10) 
binär 0101 0101 = dezimal 85 (Kombination 01) 

Die Kombination 00 entspricht der Hintergrundfarbe. Das 
Programm MULTICOLORTEST1 (Listing 1) fragt zunächst 
nach den von Ihnen gewünschten Farben. 

Die ^ - ihenfolge der Angaben folgt dabei den verschiede¬ 
nen A-Kennungen des COLOR-Befehls, die wir vorhin ver¬ 
wendet haben. In Zeile 20 werden die von Ihnen gewünsch¬ 
ten Farben dann in die Register geschrieben, in Zeile 30 der 
Mehrfarbenmodus eingeschaltet und das Farb-RAM be¬ 
schrieben. Die Zeilen 40 bis 60 tragen die oben ermittelten 
Bitkombinationen in die ersten Plätze der Bit-Map ein. Die fol¬ 
genden CHAR-Befehle (die lernen wir noch kennen) schrei¬ 
ben nun jeweils in einer der drei Farben einen Orientierungs¬ 
text auf den Bildschirm. Übrigens sieht der Text manchmal in 
diesem Modus etwas merkwürdig aus: Die Zeichenmuster 
sind nämlich nicht für die Bitpaardarstellung entworfen. 

Aus dem Programm folgt eine recht einprägsame Regel: 
Der Dezimalwert einer Bitkombination ist die Kennung A des 
dazugehörigen COLOR-Befehls. Erklärung: 

Die Bitkombination 00 wird mittels COLORO,... farblich 
festgelegt, die Bitkombination 10 (das ist dezimal 2) folgt in 


5 REM ***** MULTICQLORTEST 1 ***** 

10 INPUT "FARBEN F0,F1,F2,F3“;F0,F1,F2,F3 
20 COLDR 0,F0: COLOR 1,F1: COLOR 2,F2: COLOR 
3,F3 

30 BRAPHIC 3,1: SCNCLR 3 

40 BANK 0: POKE DEC("2000">,255: POKE DEC«"2 
001"),255 

50 POKE DEC("2002"),170: POKE DEC<"2003">,17 
0 

60 POKE DEC«"2004"),B5: POKE DEC<"2005"),85 
70 CHAR 1,10,10,"OBEN :11" 

80 CHAR 2,10,13,"MITTE:10" 

90 CHAR 3,10,16,"UNTEN:01" 


Listing 1. »MULTICOLORTEST1« - welche Bit-Kombination 
gehört zu welcher Farbquelle? 
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Bit: 

7 6 5 1 4 

3 2 10 

bestimmt: 

Vordergrund 

Hintergrund 

Bit-Map-Inh.: 

1 

0 

Farbbefehl: 

Color 1 ,... 

Color 0 ,... 


Bild 8. Ein Byte aus dem Farb-RAM ab S1C00 in den Grafik- 
Modi 1 und 2 


der Zeichnung der Farbe, die durch C0L0R2,... definiert 
wird, und so weiter. 

Nun können wir zusammenfassen: 

Im hochauflösenden Modus folgt die Farbgebung dem 
Schema in Bild 8. 

Im Mehrfarbenmodus kommt die Hintergrundfarbe (bei 00) 
aus der Speicherstelle 53281, die Farben der Kombinatio¬ 
nen 01 und 10 werden gemäß dem Schema in Bild 9 verteilt. 

Woher kommt die Farbe der Bitkombination 11? Wir haben 
festgestellt, daß diese Farbe in der Speicherstelle $85 fest¬ 
gehalten wird. Im C64-Modus wird sie aus dem normalen 
Text-Farb-RAM (ab $D800) entnommen. Überprüft man aber 
im C 128-Modus diesen Speicherbereich, dann ist darin nur 
die normale Textfarbe zu finden. Hier muß also ein anderes 
Prinzip der Farbgebung verfolgt werden. Versuche zeigen, 
daß auch die Multicolorfarbe 2 pixelweise vergeben wird, 
was auf ein weiteres Farb-RAM schließen lassen könnte - 
aber die Suche danach verläuft ergebnislos. Diese Frage 
kann wohl erst dann geklärt werden, wenn eines Tages ein 
ROM-Listing des Basic-Interpreters zur Verfügung steht. 
Solange birgt unser Computer noch einige Geheimnisse. 


5 REM ***** MULTICOLORTEST 2 ***** 

1® INPUT "FARBEN F0,F1,F2,F3";Fe,Fl,F2,F3 
20 COLOR 0,F0: COLOR 1,F1: CQLOR 2,F2: COLOR 
3,F3 

30 GRAPHIC 3,1: SCNCLR 3 

40 BANK 0: POKE DEC<"2000"),255: POKE DEC("2 
001">,255 

50 POKE DEC (*•2002") ,170: POKE DEC < "2003" ) , 17 
0 

60 POKE DEC("2004"),85: POKE DEC("2005"),85 
70 CHAR 1,10,10,"OBEN :11" 

80 CHAR 2,10,13,"MITTE:10" 

90 CHAR 3,10,16,"UNTEN: 01" 

100 PRINT "NEUE FARBEN FUER 1 UND 2:" 

110 INPUT "Fl,F2 ="5 F1,F2: F1=F1-1: F2=F2-1: 
F=16*F1+F2 

120 PRINT CHR* <147) CHR*(17) 

130 PRINT "MONITOR" CHR*<17> CHR*<17) CHRS(1 
7) CHR*<17> 

140 PRINT "F 01C00 01FE7 " HEX*(F) 

150 PRINT "X" CHR*<17> 

160 PRINT "RUN200" 

170 PRINT CHR*(19); 

180 BANK 0: POKE 842,13: POKE 843,13: POKE 8 
44,13: POKE 845,13: POKE 208,4: END 
190 : 

200 PRINT CHR*(147) CHR*(17)"DAS WARB!" 


Listing 2. »MULTICOLORTEST2« - ein fertiges Bild ändert 
seine Farben 


Die Farbe aller Bitpaare 00 läßt sich einfach durch COLOR 
0,... er '.schalten. Andere COLOR-Befehle für die drei restli- 


Bit: 

7 6 5 4 

3 2 10 

bestimmt: 

Vordergrund 

Multicolorfarbe 1 

Bit-Kombination: 

01 

10 

Farbbefehl: 

■ Color 1,... 

Color 2,... 


Bild 9. Ein Byte aus dem Farb-RAM ab S1C00 in den Grafik- 
Modi 3 und 4 


chen Farben oder auch für die Vordergrund- und die Hinter¬ 
grundfarbe im hochauflösenden Modus führen zu keinem 
Ergebnis: Erst ein Löschvorgang ergäbe die Neubelegung 
des Farb-RAM, wodurch aber auch die Bit-Map frei und unser 
Bild zerstört würde. 

Da scheint nur eine Schleife Abhilfe zu bringen, die den 
Farbspeicher neu schreibt. Nehmen wir an, unsere neue Vor¬ 
dergrundfarbe hieße Fl und die neue Hintergrund- (in den 
Grafik-Modi 1 und 2) oder Multicolorfarbe 1 (im Grafikmodus 
3 oder 4) wäre F2. Dann haben wir zunächst die Gestalt eines 
Bytes aus dem Farb-RAM zu bestimmen: 


Farbwechsel 

Zwei Aspekte sind es nun noch in bezug auf Farbgebung, 
die uns interessieren: 

- Kann man mehr als vier Farben verwenden? 

- Kann man in einem fertigen Bild die Farben ändern? 

Der erste Aspekt ist sicher erfüllbar, denn ebenso, wie das 
Farb-RAM des Textbildschirms durch POKE-Befehle Zelle für 
Zelle ansprechbar ist, ist es auch das Grafik-Farb-RAM ab 
$1C00. Allerdings muß man sich gut überlegen, was man hier 
hineinschreibt: Sowohl die Bits 0 bis 3 als auch die Bits 4 bis 
7 haben ja eine Bedeutung, wie wir gesehen haben. 

Eine andere Möglichkeit ist es, mittels des COLOR-Befehls 
eine oder mehrere Farben (Vordergrund, Multicolorl oder 2) 
zu ändern und dann mittels eines Grafik-Befehls eben diese 
Farbquelle aufzurufen (dazu kommen wir noch). Hier ist zu 
beachten, daß sich die grafischen Objekte, die damit 
gezeichnet werden, nicht zu nahe kommen, weil ja immer ein 
ganzes Pixel umgefärbt wird und daher auch schon vorhan¬ 
dene Bildteile unter Umständen die neue Farbe annehmen. 

Wesentlich schwieriger ist es allerdings, ein Bild, dessen 
Farbgebung uns nicht gefällt, umzufärben. Nehmen wir an, 
ein Multicolor-Bildschirm trüge Farben, die wir verändern 
wollen. Was wäre zu tun? 


F1=F1-1:F2=F2-1 
Das Byte wäre dann: 

16#F1+F2 

Die Schleife lautet nun: 

FÜR 1=7168 TO 8167:POKE I,16*F1+F2:NEXT I 

So etwas dauert natürlich eine Weile und wir können ganz 
gemächlich Zusehen, wie von oben nach unten die Farb¬ 
wechsel stattfinden. 

Etwas schneller geht das mit einem Trick, der im Abschnitt 
zu den selbstmodifizierenden Programmen erklärt wird. Die 
beiden Programme MULTICOLORTEST2 (Listing 2) und 
HIRES-FARBAEND (Listing 3) zeigen Ihnen das Verfahren. 

Beide Programme zeichnen zunächst etwas auf den Bild¬ 
schirm und fragen dann nach den gewünschten neuen Far¬ 
ben. Falls Sie nur mit einem Bildschirm arbeiten, sollten Sie 
noch die Umschaltung auf den Textbildschirm (GRAPHICO 
vor der Frage) und hinterher wieder auf den Grafikbildschirm 
vornehmen. Nach dem Berechnen des Bytewertes schaltet 
das Programm den Monitor ein und füllt mittels der F-Funktion 
den Farbspeicher von $1000 bis $1FE7. Danach verläßt es 
den Monitor wieder und fährt mit dem Basic-Programm fort 
(ab Zeile 160 beziehungsweise 200). 

Auf diese Weise können alle beiden Farben im Hochauflö¬ 
sungsmodus verändert werden. Drei Farben von Multicolor- 
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10 REM ***** HIRES-FARBAENDERUNSEN ***** 

20 INPUT "FARBEN F0,F1";F0,F1 
30 COLOR 0,F0: COLOR 1,F1 
40 GRAFMIC 1,1s SCNCLR 1 

50 BOX 1,10,10,100,100,0,1: BOX 0,20,20,30,3 

0 , 0,1 

60 PRINT “NEUE FARBEN FUER 0 UND 1:“ 

70 INPÜT , 'IF t 0.,Fl = " 5 F0,F1: F0=F0-1: Fl=Fl-ls F 
« 16 ^ 1 * 1 ^ 0 ' 

B0 PRINT CHR*C147> CHR*(17> 

90 PRINT "MONITOR" CHR*<17> CHR*(i7> CHR*<17 
) CHR*(17) 

100 PRINT "F 01C00 01FE7 " HEX*<F> 

110 PRINT "X" CHR*<17> 

120 PRINT "RUN160" 

130 PRINT CHR*(19); 

140 BANK 0: POKE B42,13s POKE 043,13. POKE B 
44,13: POKE 845,13: POKE 206,4: END 
150 : 

160 PRINT CHR*(147) CHR*<17)"DAS WARB!" 



Listing 3. »HIRES-FARBAEND« - ein Bild in den Grafik-Modi 1 
und 2 ändert seine Farben 


bildern sind ebenfalls auf diese Art und mit COLOR 0,... zu 
erneuern. Interessant ist es übrigens, daß trotz des veränder¬ 
ten Farb-RAM ein Zeichenbefehl (beispielsweise DRAW1,...) 
immer noch mit der alten Zeichenfarbe arbeitet. Die Erklärung 
liegt vermutlich darin, daß dazu die Speicherstellen ab $83 
Verwendung finden. Wenn man auch die darin befindlichen 
Angaben der neuen Farbgebung anpaßt, geschieht das nicht 
mehr. 

Wie schon vorhin angedeutet, ist die Änderung der Multi- 
colorfarbe 2, von der noch nicht die Herkunft geklärt werden 
konnte, ein Problem. Bisher existiert nur eine etwas umständ¬ 
liche Lösung: Speichern Sie Ihre Grafik inklusive des Farb- 
RAM ab. Das kann mittels des BSAVE-Befehls geschehen: 
BSAVE"Bild",ON B0,P7l68 TO P16191 
Laden Sie nun das Bild wieder ein mittels: 

C0L0R3,X:GRAPHIC3,1:BLOAD"Bild " 



Bild 11. Beispiel einer durch einen DRAW-Befehl erzeugten 
Figur 


In X steht dabei die neue gewünschte Multicolorfarbe 2, 
die nun gleich beim Einladen berücksichtigt wird. 

DRAW 


Nach all diesen etwas ermüdende aber notwendigen Vorbe¬ 
reitungen kommen wir nun zu den Zeichenbefehlen, deren 
einfachster der DRAW-Befehl ist. 

DRAW A,X1,Y1 TO X2.Y2 

zeichnet eine Linie vom Punkt XI,Y1 zum Punkt X2,Y2 (siehe 
Bild 10). 

A ist eine Kennzahl für die Quelle, aus der die Farbe der 
Zeichnung herrührt. A hat dabei folgende Bedeutung: 

A = 0 Hintergrundfarbe 
A = 1 Vordergrundfarbe 
A = 2 Multicolorfarbe 1 
A = 3 Multicolorfarbe 2 

Dieser Befehl ist sehr vielseitig verwendbar. Es ist bei¬ 
spielsweise möglich, einen Linienzug über weitaus mehr als 
nur zwei Punkte zu führen. Der Befehl 


dann wird lediglich der Punkt X1,Y1 gezeichnet. 

Schreibt man dagegen den Befehl als 
DRAW 1 TO XI,Y1 

dann dient als Ausgangspunkt die aktuelle Grafikcursorposi¬ 
tion. Den Grafikcursor werden wir beim LOCATE-Befehl noch 
kennenlernen. Von dieser Position aus wird dann eine Linie 
nach X1,Y1 gezogen. 

Nach der Ausführung der verschiedenen DRAW-Befehle 
befindet sich der Grafikcursor an dem Punkt, der durch die 
letzte Koordinatenangabe charakterisiert wird. 

Läßt man übrigens die Farbkennung weg, schreibt also bei¬ 
spielsweise 
DRAW ,X1,Y1 TO X2,Y2 

dann wird die Linie in der Farbe gezeichnet, die im vorange¬ 
gangenen Zeichenbefehl verwendet wurde. Vielleicht erin¬ 
nern Sie sich noch an die Speicherstelle $83 COLSEL? Dort 
befindet sich immer noch vom vergangenen Befehl her die 
Farbkennung. 

BOX 


DRAW1,X1,Y1 TO X2,Y2 TO X3,Y3 TO X4,Y4 TO X5,Y5 
TO XI,Y1 

kann so ein grafisches Gebilde wie in Bild 11 erzeugen. 
Lautet der Befehl 


Mit diesem Zeichenbefehl können Rechtecke erzeugt wer¬ 
den. Auch hier sind wieder eine ganze Menge Variationen 
möglich. Die Syntax des BOX-Befehls ist: 


DRAW1,X1,Y1 


BOX A,X1,Y1,X2,Y2,W,F 
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Bild 14. Durcheinandergewürfelte Koordinaten führen den¬ 
noch zum richtigen Ergebnis: BOX 1,X2,Y2,X1,Y1 wird 
gezeichnet wie BOX 1,X1’,Y1’,X2’,Y2’ 


A ist wieder - wie schon beim DRAW-Befehl - die Farb- 
quelle. Ebenso wie dort kann man A auch weglassen und das 
Rechteck erhält dieselbe Farbe wie das zuvor gezeichnete 
Grafikobjekt. 

Bild 12 erläutert die Bedeutung der Eckkoordinaten X1,Y1 
und X2,Y2. 

X1.Y1 sind also die Koordinaten der linken oberen Ecke, 
X2,Y2 diejenigen der rechten unteren. Wir werden darauf 
gleich noch einmal zurückkommen. 

W ist ein Winkel (in Grad angegeben!), um den das Recht¬ 
eck zu drehen ist. Die Drehung erfolgt um den Mittelpunkt 
des Rechtecks im Uhrzeigersinn (siehe Bild 13). 

W darf alle Werte zwischen 0 und 65535 annehmen. 

F ist eine Kennung, die festlegt, ob das Rechteck ausge¬ 
füllt werden soll: 

F = 0 Nicht ausfüllen 
F = 1 In der gewählten Farbe ausfüllen. 

Interessant ist, was geschieht, wenn man Koordinaten ein¬ 
gibt, die unlogisch erscheinen. Beispielsweise in 
BOX 1,200,100,60,60 

wurden die Eckpunkte vertauscht. Der Computer wählt sich 
selbst die richtigen Ecken aus und zeichnet die Gestalt, die 
wir bei der richtigen Reihenfolge erhalten hätten, also 
BOX 1,60,60,200,100 


Würfeln wir die Koordinaten vollends durcheinander (siehe 
Bild 14). 

BOX 1,200,100,60,120 

gibt die linke untere und die rechte obere Ecke an. Gezeich¬ 
net wird vom Computer dennoch das richtige Rechteck (mit 
den Ecken XI’YI’ und X2’,Y2’), als hätten wir ihm befohlen 
BOX 1,60,100,200,120 

Es scheint, als gäbe es keinen Unterschied bei den verwür- 
felten Koordinatenangaben. Da existiert aber doch einer! Wir 
haben bisher den Grafikcursor nicht berücksichtigt. Der steht 
nämlich immer nach der Zeichnung am Punkt X2,Y2. Das 
bedeni.:t, daß er im Fall 
BOX 1,200,100,60,120 

auf dem Punkt 60,120 steht, wohingegen er im anderen Fall 
bei 200,120 zu finden wäre. 

Bei einer Drehung des Rechtecks durch einen Wert W wird 
der Grafikcursor nicht mitgedreht. Er bleibt stur bei X2,Y2 
stehen. 

Noch nicht ausdrücklich erwähnt wurde die Möglichkeit, 
für den Fall, daß sie nicht benötigt werden, die Größen W und 
F einfach wegzulassen. Sie werden dann beide auf 0 gesetzt. 
Man kann aber auch X2 und Y2 weglassen. Das zu zeich¬ 
nende Rechteck setzt dafür einfach wieder die Koordinaten 
des Grafikcursors ein. 

Ein Beispiel: 

BOX 3,100,50,200,80,30,1 



Bild 13. Drehung des Rechtecks durch den Parameter W im 
BOX-Befehl 


zeichnet in der Multicolorfarbe 2 (dazu muß natürlich der Gra¬ 
fikmodus 3 eingeschaltet sein) ein Rechteck, das um 30 
Grad um seinen Mittelpunkt im Uhrzeigersinn gedreht wurde 
und ausgefüllt ist. 

CIRCLE 


Ein geradezu phantastisch vielseitiger Befehl, nicht nur zum 
Zeichnen von Kreisen, wie es der Name (circle ist das engli¬ 
sche Wort für Kreis) suggeriert. Was man damit alles anstel¬ 
len kann, werden Sie gleich noch sehen. Wieder kann man 
über eine lange Parameterliste alle Optionen ausschöpfen. 
Aber keine Angst, es müssen bei weitem nicht immer alle 
angegeben werden. Komplett sieht der Befehl so aus: 
CIRCLE A, XM,YM, RX,RY, W1,W2, W, S 

Der erste Parameter A dient wie schon bei den anderen Zei¬ 
chenbefehlen zur Festlegung der Farbquelle. 

Die Koordinaten XM,YM legen den Mittelpunkt des Objekts 
fest, das wir zu zeichnen gedenken. Soll es ein Kreis werden, 
ist es also der Kreismittelpunkt. 
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Bild 15. Wirkung der Befehle CIRCLE 1,XM,YM,RX und CIRCLE 1,XM,YM,RX’,RY 


RX und RY sind die Halbmesser in horizontaler und vertika¬ 
ler Richtung. Gedanklich geht man dabei von der Ellipse aus, 
die ja zum Kreis wird, wenn beide Radien gleich sind. In die¬ 
sem Fall ist RX = RY und man kann sogar RY weglassen. Bild 
15 zeigt, wie die bisher verwendeten Bezeichnungen zu ver¬ 
stehen sind. 

Zwei CIRCLE-Befehle erzeugen hier einen Kreis (CIRCLE 
1,XM,YM,RX) und eine Ellipse (CIRCLE 1,XM,YM,RX’,RY). 

Die Angaben W1 und W2 erlauben die Festlegung eines 
Bogens aus dem Gesamtobjekt, der zu zeichnen ist. Aus¬ 
gangspunkt für die Messung der Winkel W1 und W2 ist der 
obere Scheitelpunkt der Ellipse, die man sich durch die Figur 
gelegt denken kann. Die Formulierung hört sich wesentlich 
einfacher an, wenn man von der Zeichnung eines Kreises 
ausgeht, der im normalen Koordinatensystem liegt. Dann 
zählt der Winkel vom obersten Kreispunkt an im Uhrzeiger¬ 
sinn, was Bild 16 erläutern soll. 

W1 und W2 dürfen ohne Fehlermeldung alle Werte zwi¬ 
schen 0 und 65535 annehmen, wobei allerdings Angaben, 
die größer als 33024 sind, allerlei Unsinn auf dem Bildschirm 
erzeugen. 

Was geschieht, wenn W1 größer als W2 gewählt wird? Kein 
Problem: Das Ergebnis finden Sie in einem Beispiel in Bild 17. 

Es wird der Bogen von W1 über 0 hinweg bis W2 gezeich¬ 
net. 



Bild 17. Zeichnen des Bogens, wenn W1 größer als W2 


Ein weiterer Parameter ist W, der Drehwinkel. Ebenso wie 
beim BOX-Befehl kann auch das durch CIRCLE erzeugte 
Objekt um den Mittelpunktim Uhrzeigersinn gedreht werden. 
Bild 18 zeigt die Verhältnisse dabei. 

Ohne zu murren, nimmt der Computer Werte zwischen 0 
und 65535 für W entgegen. 



Bild 16. Zeichnen eines Kreis-foder Ellipsen-jBogens durch 
CIRCLE 1,XM,YM,RX,RY,W1,W2 



Bild 18. Drehung der Ellipse um den Winkel W um den Mittel¬ 
punkt XM,YM durch: CIRCLE 1,XM,YM,RX,RY,„W 
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Bild 19. Der Parameter S bestimmt den Winkelabstand der 
berechneten Kreispunkte, zwischen denen Geraden gezogen 
werden 



Bild 20. Wirkung von S-Werten ab 180. Gezeichnet wird 
jeweils die dickere Linie. 



Der letzte Parameters kann zwischen 1 und 255 groß sein. 
Er gibt an, nach welchem Winkel jeweils der nächste Kreis¬ 
oder Ellipsenpunkt zu berechnen ist. Die so ermittelten 
Punkte werden durch Geraden miteinander verbunden. Nied¬ 
rige Werte von S bedeuten kleine Winkel. So ist der Wert 
S=2 voreingestellt und die miteinander verbundenen Eck¬ 
punkte ergeben den Eindruck eines Kreises (oder einer 
Ellipse). Erhöht man aber S, dann beginnt der Kreis (ich 
erspare mir im weiteren den Hinweis auf die Ellipse) allmäh¬ 
lich kantig zu werden. Man kann es zwar nicht erkennen, 


trotzdem ist der schnell gezeichnete Kreis (oder...) in Wahr¬ 
heit ein 36-Eck, wenn S=10 gewählt wurde. Weitere Poly¬ 
gone ergeben sich zum Beispiel: 

S=1 360-Eck 
S=2 180-Eck 
S=10 36-Eck 
S=20 18-Eck 
S=30 12-Eck 
S=60 6-Eck 

Das Bild 19 soll dazu dienen, diese Angelegenheit zu illu¬ 
strieren. 

Weil 3br gesamte Kreis einen Winkel von 360 Grad über¬ 
streicht, läßt sich eine Formel angeben, mit der gezielt n-Ecke 
erzeugt werden können: 

S = 360/n 

Wenn Sie also ein Dreieck (n=3) erzeugen möchten, müs¬ 
sen Sie S=120 eingeben. Die Formel zeigt uns noch zwei 
weitere Eigenschaften von S: 

- Zum einen kann man sie umdrehen und berechnen, wie¬ 
viele Ecken ein Polygon bei einem bestimmten S-Wert hat: 
n = 360/S 


Dabei zeigt es sich, daß für »n« auch allerhand gebrochene 
Zahlen Zustandekommen. Weil es aber beispielsweise kein 
7,2-Eck gibt (bei S=50), muß es sich hier um ein krummes 
7-Eck handeln. 

- Zum zweiten sind Eingaben größer als 180 sinnlos. S=180 
führt zum »Zweieck«, also zum Durchmesser des Kreises 
(siehe Bild 20). 

Der Startpunkt ist immer oben (also bei einem Winkel von 
0 Grad) zu finden, der Endpunkt liegt auf der Kreisperipherie 
um 180 Grad demgegenüber verdreht. Ein Weiterzählen um 
noch einmal 180 Grad führt wieder zum Startpunkt. Wächst 
S auf noch höhere Werte, dann wird nur noch eine Sehne 
gezeichnet vom Startpunkt zum Punkt 1, der beispielsweise 
bei S=225 um 225 Grad, bei S=255 um 255 Grad verdreht 
auftritt. Ein weiterer Punkt wird hier nicht mehr berechnet, 
weil damit der Ausgangspunkt bei 0 Grad überschritten 
würde. 


Den Grafikcursor hätten wir fast noch vergessen: Der 
befindet sich (im Gegensatz zum BOX-Befehl) immer dort, wo 
der letzte Punkt des CIRCLE-Befehls gesetzt wurde. 

Übrigens gilt es noch eine Besonderheit des CIRCLE- 
Befehls im Multicolormodus zu beachten. Gibt man hier näm¬ 
lich einen Befehl zum Zeichnen eines Kreises in der Form 
CIRCLE 1,XM,YM,RX 

ein, wobei ja automatisch RY = RX gesetzt wird, dann ent- 
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steht zwar auf dem Bildschirm ein Kreis. Der ist aber falsch, 
was Sie upscbW^r erkennen können, indem Sie oben und 
unten Tangenten anlegen. Das Ganze sähe beispielsweise so 
aus: 1 j 

CIRCLE' UBOviOT^OiDRAW 1,0,40 TO 159,40 
DRAW i,it|yl20‘ T?0 1^9,120 

Als gebildete Programmierer sollten wir erwarten, daß 
diese Geraden als Tangenten den Kreis am oberen und am 
unteren Rand berühren. Aber weit gefehlt, sie schneiden ihn! 
Probieren wir dagegen einmal, den Kreis mittels 
CIRCLE 1,80,100,40,40 

zu zeichnen, dann sollte ja dasselbe herauskommen. Aber 
das Ergebnis dieser Zeile ist eine Ellipse! Woran liegt das? Die 
Ursache dafür liegt in der ungleichen Skalierung der X- und 
der Y-Achse im Multicolormodus. Wenn wir dem Computer 
den Auftrag erteilen, einen Kreis zu zeichnen, dann zeichnet 
er ihn - ohne Rücksicht auf Verluste oder Skalierungen oder 
ähnliche Feinheiten. 


PAINT 


Damit kann eine von Kurvenzügen umschlossene Fläche 
ausgefüllt werden. Sie muß aber auch wirklich völlig einge¬ 
rahmt sein, denn das kleinste Loch in der Hülle führt dazu, daß 
auch die benachbarte Fläche bemalt wird. Im Befehl 
PAINT A, XI,Yl, M 

haben die einzelnen Größen folgende Bedeutung: 

A ist - wie schon gehabt - wieder die Farbquelle, mit der 
das Ausmalen geschehen soll. 

XI und Yl sind die Koordinaten eines Punktes, der in der 
auszufüllenden Fläche enthalten ist. Gleichzeitig ist das der 
Startpunkt der Aktion und hinterher liegt genau hier der Gra¬ 
fikcursor. 

Ein etwas schwerer verständlicher Parameter ist der 
Modus M. Ist nämlich M gleich 0, dann wird solange ausge¬ 
füllt, bis eine Umrahmung in der Farbe angetroffen wird, die 
im Parameter A gewählt wurde. Ist dagegen M gleich 1, dann 
zählt auch jede andere Farbe der Umrandung - sofern sie nur 
nicht die des Hintergrundes ist - als Grenze des Ausmalens. 
Befinden wir uns beispielsweise im Grafikmodus 3, dann pas¬ 
siert bei der Befehlskombination: 

B0X2,10,10,100,100:CIRCLE3,80,100,40:PAINT 1,85,85 
nicht das Ausmalen der Schnittmenge von Kreis und Recht¬ 
eck, sondern ungerührt um unsere Bemühungen übermalt 
der Computer alles, was auf dem Bildschirm zu sehen war. 
Der Grund ist, daß keine Umrahmung in der Farbe mit der 
Kennung A = 1 vorhanden war (BOX lief mit A=2 und 
CIRCLE mit A=3) und wir den Modus 0 gewählt haben. 
Modus 1 hätte unseren Wunsch erfüllt. 

PAINT arbeitet im Modus M = 1 nicht, wenn am Startpunkt 
schon eine andere Farbe als die Hintergrundfarbe gefunden 
wird. Im Modus M=0 dagegen wird immer dann ausgefüllt, 
wenn dort eine Farbe vorhanden, die von der ausgewählten 
verschieden ist. 


CHAR 


Eigentlich kein Grafikbefehl im engeren Sinn ist dieser Befehl 
zum Drucken eines Textes. Seine interessanteste Anwen¬ 
dung ist aber die Beschriftung von Grafiken, was auf andere 
Weise (außer in den Splitscreen-Modi) nicht möglich ist. 
CHAR A, XT,YT, A$, R 

bildet einen Text A$ in der Farbe der Quelle A ab. Das erste 


Zeichen befindet sich bei den Koordinaten XT,YT. Das Koordi¬ 
natensystem, das hier eine Rolle spielt, ist das im Textmodus 
gültige (25 Zeilen zu je 40 Spalten oder aber 80 Spalten). A$ 
kann jede beliebige Kombination von gültigen Zeichen ent¬ 
halten. In den Grafik-Modi werden allerdings die Steuerzei¬ 
chen als grafische Zeichen mitgedruckt. 

R ist eine Kennzahl, die es erlaubt, den Text normal oder 
revers darzustellen: 

R = 0 Normaldarstellung 
R = 1 Reversdarstellung 

Sollte der Text nicht in einer Zeile Platz finden, dann wird er 
in der nächsten fortgesetzt, also ein Verhalten, wie wir es 
auch vom PRINT-Befehl her kennen. 

Im Multicolormodus sehen die Zeichen häufig etwas merk¬ 
würdig aus. Die Zeichenmuster sind ja nicht zur Darstellung 
im Bitpaarmodus konstruiert. Soll ein Text in der Multicolor- 
farbe 2 gedruckt werden, dann ist A auf 0 und R auf 1 zu set¬ 
zen. Soll dagegen die Multicolorfarbe 1 verwendet werden, 
hält man die Farbquelle A auf 1 und für R wählt man den Wert 
0. So steht es jedenfalls im Handbuch (auf den Seiten 4-28 
und 4-29). Zumindest mein C128 folgt diesem Rezept nicht, 
sondern es genügt, einfach A entsprechend der gewünsch¬ 
ten Farbquelle (also 0,1,2,3) zu wählen. 

Der Grafikcursor bleibt übrigens vom CHAR-Befehl unbe¬ 
eindruckt. 


L0CATE 


Wir haben bei den bisher untersuchten Befehlen immer wie¬ 
der einen Grafikcursor und dessen Verhalten bei den ver¬ 
schiedenen Operationen erwähnt. Sie haben diesen Cursor 
aber noch nie zu Gesicht bekommen - werden Sie auch nie, 
denn er führt sein verborgenes Leben nur in einigen Spei¬ 
cherstellen, nie aber auf dem Bildschirm. Trotzdem ist er 
recht nützlich. Er dient gewissermaßen als Merkstelle für 
bestimmte Punktkoordinaten: 

- Als Startpunkt bei DRAW 
Beispielsweise für DRAW 1 TO X2,Y2 

- Als Eckpunkt bei BOX 

- Als Mittelpunkt bei CIRCLE: Laut Handbuch soll man die 
Koordinaten XM,YM weglassen können und dafür werde 
automatisch der Ort des Grafikcursors eingesetzt. Leider 
war das bei meinem C128 nicht nachvollziehbar. Es ergab 
sich nur allerlei Unsinn auf dem Bildschirm. 

- Als Startpunkt für PAINT: Auch hier kann man ohne Angabe 
der Startpunktkoordinaten Flächen ausmalen, denn es wird 
automatisch der Ort des Grafikcursors verwendet. 
LOCATE X,Y führt diesen Grafikcursor an den durch die 
Koordinaten X,Y definierten Punkt. 


RD0T 


Wollen Sie erfahren, wo sich der Grafikcursor im Augenblick 
befindet, dann dient dieser Befehl Ihrem Wunsch. Das Argu¬ 
ment von RDOT(n) hat folgende Bedeutungen: 

n = 0 liefert die aktuelle X-Position. 
n = 1 ergibt die aktuelle Y-Position des Grafikcursors, 
n = 2 macht eine Aussage über die aktuelle Farbquelle. 

Die Koordinatenwerte, die RDOT-Anfragen ergeben, bezie¬ 
hen sich immer auf die grundlegenden Koordinatensysteme. 
Im hochauflösenden Grafikmodus stammen die Werte daher 
immer aus einem System, dessen X-Werte zwischen 0 und 
319 liegen und dessen Y-Werte von 0 bis 199 reichen. Im 
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Bild 21. Wirkung von SCALE 1,400,300 in den Grafik-Modi 1 
und 2 



Muiticolormodus geht die X-Achse nur bis 159. Das im Auge 
zu behalten ist besonders für den nun folgenden Befehl wich¬ 
tig: 


ein System, dessen X-Achse von 0 bis 400 und Y-Achse von 
0 bis 300 reicht (siehe Bild 21). 

Die Werte Xmax müssen größer als 320 gewählt werden, 
die für Ymax größer als 200. Es ist so also nicht möglich, ver¬ 
kleinerte Systeme zu erzeugen. Im Gegensatz zu den Hand¬ 
buchangaben, die nur Werte bis 1023 erlauben, ist es tat¬ 
sächlich möglich, sowohl Xmax als auch Ymax bis 32767 
anzugeben. 

Im Muiticolormodus ist zu beachten, daß weiterhin auf der 
X-Achse immer Bit-Paare dargestellt werden. Im Grafikmodus 
3 oder 4 erzeugt daher der Befehl 
SCALE 1, 400, 300 

ein System, dessen X-Koordinaten von 0 bis 200 und dessen 
Y-Koordinaten von 0 bis 300 reichen (siehe Bild 22). 

Natürlich werden weiterhin die Abbildungen auf dem Bild¬ 
schirm mit einer Auflösung von insgesamt 64000 Punkten 
(oder 32000 im Muiticolormodus) dargestellt. Die Bit-Map 
bleibt unverändert. Lediglich der Berechnungsweg zur Dar¬ 
stellung der Punkte verändert sich. Etwas unglücklich wer¬ 
den viele Anwender des C128 darüber sein, daß der SCALE- 
Befehl keine weitergehenden Umstellungen des Koordina¬ 
tensystems ermöglicht. Wünschenswert wäre sicherlich die 
Möglichkeit gewesen, den Ursprung zu verschieben (wie es 
der TRS-Befehl der Grafikerweiterung HIRES-3 für den 
C64-Modus erlaubt). Durch diese mindere Ausstattung 
kommt dem SCALE-Befehl nicht die große Bedeutung zu, die 
er haben könnte, denn jeder Anwender muß die langwierigen 
Transformationen weiterhin programmieren. 

SCALE hat auch Einfluß auf das Ergebnis eines CIRCLE- 
Befehls. Ebenso, wie wir es vorhin beim Muiticolormodus 
beobachten konnten, wo ohne Rücksicht auf den anderen 
Maßstab der Y-Achse ein Kreis gezeichnet wurde, findet das 
hier in allen Grafik-Modi statt. Wenn also der richtige Kreis - 
as heißt derjenige, der bei allen Maßstäben in Y-Richtung 
en gleichen Durchmesser aufweist wie in X-Richtung - 
gezeichnet werden soll, muß das nun immer durch den 
CIRCLE-Befehl mit zwei Radienangaben geschehen. Das 
sollen Ihnen die Bilder 23 und 24 erläutern. 

Die Verhältnisse in diesen Abbildungen beziehen sich auf 
die Grafik-Modi 1 und 2. Das Achsenverhältnis im Multicolor- 
modus ist durch den Faktor 2 in X-Richtung verändert. Man 
sollte also festhalten, daß immer dann unverzerrte Bilder 
Zustandekommen, wenn die Achsenverhältnisse wie folgt 
sind: 

Grafik-Modi 1 und 2:X:Y = 1.6 
Grafik-Modi 3 und 4:X:Y = 3.2 


SCALE 


Mittels 

SCALE n, Xmax, Ymax 

können wir neue Koordinatensysteme auf unserem Bild¬ 
schirm definieren. Die Kennzahl n kann zwei Optionen 
anwählen: 

n = 0 Das reguläre System ist eingeschaltet: 

Grafik-Modi 1 und 2: 

X von 0 bis 319, Y von 0 bis 199 
n = 1 Ein verändertes System ist nun Bezugssystem gewor¬ 
den. 

Wenn durch n = 1 die neue Skalierung eingeschaltet 
wurde, gibt es zwei Möglichkeiten. Schreibt man lediglich 
SCALE 1, dann hat man ein Koordinatensystem gewählt, des¬ 
sen X-und Y-Koordinaten jeweils von Obis 1023 reichen. Der 
zweite Weg ist es, selbst die Reichweiten der Skalen festzu¬ 
legen. Das geschieht durch die Angaben von Xmax und 
Ymax, den Höchstwerten auf der jeweiligen Achse. So wählt 
im Grafikmodus 1 der Befehl 
SCALE 1, 400, 300 



Bild 23. SCALE 1,480,300 erzeugt in den Grafik-Modi 1 und 2 
dasselbe Achsenverhältnis wie das normale System: 320/200 
= 480/300 = 1.6. Der Kreis CIRCLE 1,200,200,50 ist identisch 
mit dem Kreis CIRCLE 1,200,200,50,50. 
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Bild 24. Durch SCALE 1,480,600 ist ein Achsenverhältnis von 
480/600 = 0.8 geschaffen worden. CIRCLE 1,200,200,50 
erzeugt den falschen Kreis. CIRCLE 1,200,200,50,50 zeichnet 
zwar den richtigen Kreis, der aber zur Ellipse verzerrt wird. 

Der SCALE-Befehl kann - nebenbei bemerkt - innerhalb 
eines Programms oder bei ein und demselben Bildschirm - 
mehrfach angewendet werden. Das ergibt interessante 
Effekte. 


SCNCLR 


Bei der Anwendung des SCNCLR-Befehls in den Grafik- 
Modi muß bedacht werden, daß für den Multicolormodus und 
für den hochauflösenden Modus dieselbe Bit-Map benutzt 
wird. Nach SCNCLR3 ist also auch ein im Grafik-Modus 1 
sinnvolles Bild verschwunden. 


WIDTH 


»Width« ergibt aus dem Englischen ins Deutsche übersetzt 
den Begriff »Breite«. Gemeint ist damit die Strichstärke, in der 
Zeichenbefehle auf dem Bildschirm realisiert werden. 

Mit WIDTH 1 schaltet man die normale Strichdicke ein, mit 
WIDTH 2 wird allen grafischen Objekten die doppelte Strich¬ 
breite zugeordnet. 

Alle Zeichenbefehle nach einem WIDTH-Befehl führen 
dann zur darin angegebenen Strichstärke. 


RCLR 


Dieser Befehl bildet das Gegenstück zum COLOR-Befehl. 
Mittels RCLR n ist es möglich, festzustellen, welche Farbzu- 
ordnungen zu den verschiedenen Quellen getroffen worden 
sind, »n« ist dabei eine Kennzahl mit derselben Bedeutung 
wie der erste Parameter der COLOR-Anweisung. 

PRINT RCLR(2) 

gibt also Auskunft über die Farbe, die als Multicolorfarbe 1 
definiert wurde. 


»SCreeN CLeaR« ist englisch und heißt etwa »Bildschirm frei¬ 
machen«. Das bedeutet, daß in den Text-Modi der Speicher- RGR 

bereich ab $400, in den Grafik-Modi sowohl die Bit-Map als 


auch das Farb-RAM ab $1C00 gelöscht, beziehungsweise 
mit Leerzeichen oder Farbcode beschrieben werden. Wel¬ 
che Bereiche gelöscht werden, welche Bildschirme also, ent¬ 
scheidet das Argument von SCNCLR n. Die Zuordungen von 
»n« sind hier die gleichen, die auch beim GRAPHIC-Befehl 
verwendet werden. 

Ein gerade sichtbarer Grafik-Bildschirm ist auch löschbar 
ohne Angabe eines Arguments, SCNCLR genügt in diesem 
Fall. Sollte im Textmodus ein Fenster mittels WINDOW defi¬ 
niert sein, dann bezieht sich der Löschbefehl auf den Fen¬ 
sterinhalt. 


Vermutlich relativ selten benötigt, ergibt 
PRINT RGR(x) 

den aktuellen Grafikmodus. Das Argument x ist hier lediglich 
ein Dummy, hat also keine Funktion außer der eines Platzhal¬ 
ters. Die sich ergebende Zahl entspricht dem ersten Argu¬ 
ment des GRAPHIC-Befehls, gibt also den Grafikmodus an. 

Mit diesen Grafikbefehlen haben Sie also ein Werkzeug in 
der Hand, das bei richtiger Anwendung die tollsten Effekte 
auf dem Bildschirm ermöglicht. 

(Heimo Ponnath/dm) 
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Hardware-Tips zum C128 


Die Hardware des C128 verbirgt noch einige 
Geheimnisse. Ein Teil davon wird nun offenbart. 
Außerdem stellen wir verschiedene Methoden vor, 
um mehrere Betriebssysteme im C128- oder C64- 
Modus in ein einziges EPROM zu brennen. 

D er elektrische und mechanische Aufbau des CI28 ist 
noch für einige Kniffe und Tricks gut. Sie können durch 
kleine Eingriffe an der Hardware des C128 Änderun¬ 
gen am System vornehmen, die zum Beispiel eine Um¬ 
schaltmöglichkeit zwischen zwei verschiedenen CI 28- 
Betriebssystemen ohne großen Aufwand ermöglichen. Des 
weiteren lassen sich in einem einzigen 27512-EPROM vier 
Betriebssysteme im C128-Modus und sogar sieben im 
C64-Modus unterbringen. 

Diesen Artikel sollten Sie aber nur lesen, wenn Sie sich mit 
Hardware einigermaßen gut auskennen, da Sie sonst schnell 
etwas an Ihrem Computer zerstören könnten. Beachten Sie 
bitte außerdem, daß ein Öffnen des Gerätes einen Verlust der 
Garantieansprüche nach sich zieht. Als Bonbon erhalten Sie 
noch den kompletten Schaltplan des C128. Bitte bedenken 
Sie, daß die vier einzelnen Teilschaltpläne als ein Ganzes 
angesehen werden müssen. 

Übersteuerung monochromer Monitore 


Ein Problem der Anpassung Commodore-fremder, einfarbi¬ 
ger 80-Zeichen-Monitore läßt sich leicht beheben: Es kann 
Vorkommen, daß fremde Schwarzweiß-Monitore beim An¬ 
schluß an das monochrome Ausgangssignal (Kontakt 7 des 
RGB-Ausgangs) zum Übersteuern neigen. Dies macht sich 
dadurch bemerkbar, daß die Zeichen auf dem Bildschirm 
nicht mehr gestochen scharf, sondern verwaschen wirken. 
Der Grund liegt darin, daß das Ausgangssignal eine zu hohe 
Spitzenspannung aufweist, die den Eingang des Monitors 
übersteuert. Eine Lösung ist das Herabsetzen dieser Spit¬ 
zenspannung. 

Man muß nicht unbedingt durch externe Beschaltung das 
Signal »bändigen«. Leichter ist es, im Computer eine Ände¬ 
rung vorzunehmen. Dazu betrachten wir uns den dritten Teil 
des folgenden Schaltplans: 

In der unteren Hälfte am rechten Bildrand sehen Sie die 
RGB-BuchseCNIO. Das fragliche Signal liegt an Kontakt 7 an 
(Monochrome). Verfolgen Sie nun diese Leitung bis zum Tran¬ 
sistor Ql (2SC1815). Wenn Sie nun an die Basis des Transi¬ 
stors (der Kontakt, der mit dem Widerstand R26 verbunden 
ist) einen Widerstand von 100 Ohm anlegen und das andere 
Ende des Widerstandes mit Masse verbinden, haben Sie das 
Ausgangssignal auf ein Maß begrenzt, das Ihren angeschlos¬ 
senen Monitor nun nicht mehr übersteuert. 

Betriebssystem-Umschultung eingebaut 


Vielleicht ist Ihnen beim Betrachten des vierten Schaltplanes 
schon die merkwürdige Beschriftung der Bausteine U32 und 
U34 aufgefallen? Dort sind nämlich zwei verschiedene Werte 
für diese Bausteine angegeben. Zum einen steht da 23128, 
aber im gleichen Zug findet sich auch die Bezeichnung 
23256. Hardware-Kenner werden nun wissen, daß ein 
23128-ROM 16 KByte enthält, ein 23256 aber 32 KByte an 
Informationen beherbergt. Was hat es also damit auf sich? 


Sehen wir uns erst einmal an, was die ROMs U32 bis U35 
eigentlich enthalten. Betrachten Sie dazu auch das obere 
Drittel des vierten Schaltplanes: 

U32 - In diesem 16-KByte-Baustein befindet sich der 
Basic-Interpreter für den C64-Modus und dessen Betriebs¬ 
system 

U33 - Die ersten 16 KByte des Basic-7.0-lnterpreters für 
den C128-Modus 

U34 - Der Inhalt dieses ROMs besteht aus den zweiten 16 
KByte des Basic-7.0-lnterpreters 

U35 - Dieser ROM-Baustein enthält 16 KByte Kernel 
(Betriebssystem) für den C128-Modus 

Wir stellen also fest: vier 16-KByte-Bausteine. Warum kön¬ 
nen aber U32 und U34 mit 32-KByte-Bausteinen bestückt 
werden? 

Es ist durchaus möglich, die Inhalte der ROMs U32 und 
U35 in ein einziges EPROM vom Typ 27256 zu brennen, in 
den Platz U32 zu stecken und den Steckplatz U35 freizulas¬ 
sen. Gleiches geschieht dann auch mit den Inhalten der 
ROMs U33 und U34, die, in ein EPROM 27256 gebrannt, im 
Steckplatz U34 ein neues Zuhause finden. Die Auswahl, ob 
nun vier Bausteine zu je 16 KByte oder zwei zu je 32 KByte 
angesprochen werden, erfolgt über einen dreifachen Ein-/ 
Aus-Schalter. Betrachten wir uns den Plan 2. Im unteren 
rechten Viertel finden Sie die PLA 8721 (Ul 1), die für die 
Selektion der einzelnen Bausteine verantwortlich ist. 

Am Pin 27 können Sie eine Brücke (J3) erkennen, die für 
die Auswahl der verwendeten Typen zuständig ist. Bei offe¬ 
ner Biüi ke spricht die PLA die vier 16-KByte-Bausteine an, 
bei geschlossener die 32 KByte-EPROMs. Des weiteren 
müssen wir noch den Plan 4 betrachten. Jeweils links ober¬ 
halb der ROMs U32 und U34 finden Sie eine Brücke (J4 und 
J6), die ebenfalls eine Rolle bei der Art der verwendeten Bau¬ 
steine spielen. Sind diese Brücken offen, müssen 16-KByte- 
Bausteine eingesetzt sein, bei geschlossenen Brücken 
wären es die 32 KByte-EPROMs. Was kann man nun aber 
damit anstellen? 

Eine Möglichkeit wäre, in einem 27256-EPROM in den 
unteren 16 KByte den Inhalt des ROMs U32 und im oberen 
16-KByte-Bereich ein geändertes Kernel für den CI 28- 
Modus einzuprogrammieren. Würde nun der Baustein U35 in 
seinem Sockel belassen und das neue EPROM in den Platz 
U32 eingesetzt, so könnte ohne viel Aufwand intern zwi¬ 
schen zwei C128-Betriebssystemen umgeschaltet werden. 
Es müßten nur die Brücken J3, J4 und J6 mit einem dreifa¬ 
chen Ein-/Aus-Schalter gleichzeitig überbrückt oder geöffnet 
werden. Allerdings ist zu beachten, daß sich im Steckplatz 
U34 ebenfalls ein 32 KByte-EPROM befinden muß, das im 
oberen 16-KByte-Bereich zum Beispiel einen geänderten 
Teil des Basic-7.0-lnterpreters enthält. 

Wie Sie nun, wie eingangs erwähnt, mehrere Betriebssy¬ 
steme in einem 27512-EPROM unterbringen können, erklä¬ 
ren wir Ihnen ein paar Absätze später. 

Bildschirm »einfrieren« 


Vielleicht möchten auch Sie gerne Bildschirmfotos machen, 
die »lupenrein« und nicht verwaschen wirken. Oder sei es 
nur, um eine besonders gelungene Grafik, die sich leider zu 
schnell bewegt, im Detail betrachten zu können. Im alten C 64 
konnte man als einzige Möglichkeit das Bild anhalten, wenn 
man den READY-Eingang des Prozessors durch ein Signal 
belegte. Nahm man jedoch die Sperre wieder weg, stürzte 
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das Programm jedes zweite Mal ab. Im C128 läßt sich ein ste¬ 
hendes Bild auch ohne das Risiko eines Systemabsturzes 
erreichen. Dazu muß nur das Signal »DMARQST«, das von Pin 
11 des VIC (U21) kontrolliert wird, auf HIGH gelegt werden. 
Dies läßt sich durch einen einfachen Ein-Taster bewerkstelli¬ 
gen. Das eine Kabel verbinden Sie mit Pin 11 des VIC, das 
andere mit +5V. Schon erhalten Sie ein stehendes Bild, das 
nach Loslassen des Knopfes in 99,9 Prozent aller Fälle wei¬ 
terläuft. Den Schalter können Sie sich zum Beispiel auf der 
rechten Seite neben dem Reset-Knopf einbauen und das 
Kabel frei unter der Platine verlegen. 

Farbabgleich 


Sollten Ihnen die Farben, die Ihr C128 liefert, etwas schwach 
und ausgebleicht Vorkommen, kann es sein, daß der Video- 
Prozessor nicht die richtige Taktfrequenz erhält, die nötig ist, 
um ihn mit dem Fernseher (Monitor) zu synchronisieren. 
Abhilfe kann ein Nachregulieren der Frequenz sein. Dazu 
drehen Sie den Drehkondensator C20 (Plan 3, oben rechts 
- Sitz auf der Platine neben dem VIC) etwas nach links oder 
rechts. Probieren Sie so lange, bis Sie den besten Farbwert 
erhalten. 

C 64-Modus gleich beim Einschnitten 


keit dazu ist, einen Kondensator an entsprechender Stelle 
einzubauen. 

Bei genauer Betrachtung der Funktionsweise eines Kon¬ 
densators zeigt sich, daß dieser im ersten Moment der Aufla¬ 
dungsphase einen Kurzschluß (geschlossener Schalter) dar¬ 
stellt. Damit wäre eine automatische Modulkennung durch 
Beschälten des EXROM-Anschlusses mit Masse erreicht. 
Bei ersten Versuchen mit einem 10/*F-Kondensator funktio¬ 
nierte die Sache bereits recht gut. Das System meldete sich 
zwar immer noch mit »30719 BASIC BYTES FREE«, doch war 
der Speicherbereich ab $8000 nun frei. Nach weiteren 
Experimenten mit verschiedenen Kapazitäten stellte sich 
dann heraus, daß sich bei 3,3/tF der Kondensator zum Zeit¬ 
punkt der Modulkennung genügend entladen hat. Zum Zeit¬ 
punkt der Berechnung der Speichergröße aber ist er genü¬ 
gend aufgeladen, um die Berechnungsroutine nicht weiter zu 
stören. 

Bei geschlossenem Schalter S1 meldet sich nun der C128 
direkt mit der Einschaltmeldung des C 64 und »38911 BASIC 
BYTES FREE«. 

Dieser Kondensator muß aber schaltbar gemacht werden, 
da man sonst nie mehr in den C128-Modus gelangen kann. 

Mehrere Betriebssysteme 
in größeren EPROMs 


Da derzeit noch nicht allzuviel Software für den C128- und 
CP/M-Modus auf dem Markt erhältlich ist, wird der CI28 
wohl meistens im C 64-Modus betrieben. Es ist aber mit der 
Zeit lästig, immer beim Einschalten oder einem Reset die 
Commodore-Taste gedrückt zu halten oder mit dem Befehl 
GO 64 in dessen Modus zu gelangen. Abhilfe kann die aus 
Bild 1 ersichtliche Schaltung schaffen. 


64E. . „ 

Das Funktionsprinzip: Der CI 28 springt bei eingesteck¬ 
tem Modul im Expansion-Port automatisch in den 
C 64-Modus. Es muß also nur das Vorhandensein eines 
Moduls simuliert werden. Da das System auf Grund des 
Pegels der EXROM- oder' GAME-Leitung am Expansion-Port 
feststellt, ob ein Modul eingesteckt ist, muß nur die EXROM- 
Leitung auf Masse gelegt werden. Verbindet man diese Lei¬ 
tung nun direkt mit Masse, so springt der Computer in die 
C64-Betriebsart. Es folgt aber eine enttäuschende Ein¬ 
schaltmeldung: »30719 BASIC BYTES FREE« steht da auf 
dem Bildschirm. Was ist der Grund, daß plötzlich 8 KByte 
weniger zur Verfügung stehen? Für den Computer steckt nun 
ein Modul am Expansion-Port, obwohl dort keines zu sehen 
ist. Auch ein Blick in den Speicherbereich ab $8000 zeigt, 
daß dieser Bereich nicht ansprechbar ist. Also muß dieser 
Bereich wieder durch Entfernen der Modulkennung dem 
Gesamtspeicher zugänglich gemacht werden. Eine Möglich- 


Für den C128-Modus: 

Mit der in Bild 2 abgebildeten Schaltung wird es nun mög¬ 
lich, auf einfache Weise vier Betriebssysteme im 
CI 28-Modus benutzen zu können (das Betriebssystem ist 
im ROM U35 enthalten). Diese Schaltung läßt sich ebenfalls 
verwerten, wenn man einen Teil des Basic-7.0-lnterpreters 
' ' »umstricken« möchte (zum Beispiel, um die Einschaltmel¬ 

dung, die sich im ROM U34 befindet, zu verändern. Es kann 
aber auch eine OLD-Routine integriert werden. Eine solche 
Routine, die sich zum Einbinden eignet, wurde in Ausgabe 
12/85 veröffentlicht). 

Ein EPROM vom Typ 27512 kann maximal 64 KByte an 
Informationen aufnehmen. Das Betriebssystem des CI28 
umfaßt aber »nur« 16 KByte. Es ist also möglich, vier 
C128-Betriebssysteme durch Umschalten zur Verfügung zu 
haben. 

Zum Einbau gehen Sie folgendermaßen vor: Nachdem Sie 
Ihre verschiedenen Betriebssysteme (oder Interpreter- 
Versionen) getestet und nacheinander in ein 27512-EPROM 
gebrannt haben, öffnen Sie Ihren CI28 (Vorsicht: Garantie¬ 
verlust!). 

Biegen Sie Pin 1 und 27 des EPROMs nach oben, so daß 
sie keinen Kontakt mehr mit dem Computer haben können. 



Bild 1. Mit dieser Beschaltung springt der C128 nach dem 
Einschalten sofort in den C 64-Modus 


Der Schaltplan fuer die Betriebs- 
systeMunscHaltung 1. 

Es werden Jeweils 16 k-Blöcke um- 
geschaltet. 

+5U 2*1N4±48 



Bild 2. Vier verschiedene CI 28-Betriebssysteme in einem 
EPROM 
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Der Schaltplan fuer die Betriebs- 
systeHunschaltung 3 <C 64-Modus). 
Es werden Jeweils 8 k-Blöcke um- 
geschaltet. 

Block 6 bleibt iMMer bestehen. 



Schalter 
3 Kontakte 


Der Schaltplan fuer die Betriebs- 
sgstenunschaltung 2 CC 64-Modus) 
Es werden Jeweils 8 k-Blöcke uh- 
geschaltet. 

Block 0 bleibt bestehen. 



27512 12*IN4148 


Bild 3. Drei verschiedene Betriebssysteme für den 
C64-Modus in einem EPROM 

Stecken Sie das EPROM in den jeweiligen Sockel (Kernel: 
U35, Interpreter Low: U33, Interpreter High: U34) und 
beschälten Sie die beiden herausragenden Beinchen wie 
aus Bild 2 ersichtlich. 

Die Schaltung ist nicht absturzfrei. Je nachdem, ob die 
gerade bearbeitete Routine des jeweiligen Systems mit der 
originalen übereinstimmt, kann es auch ohne Absturz funktio¬ 
nieren. Das System stürzt nur dann ab, wenn innerhalb ver¬ 
schiedener Routinen umgeschaltet wird. 

Für den C 64-Modus: 

Hier stellen wir Ihnen zwei Arten der Umschaltung vor: zum 
einen für drei, zum zweiten für sieben verschiedene Kernel- 
Versionen. Beginnen wir mit der kleineren der beiden Mög¬ 
lichkeiten. 

Hierfür benötigen Sie ein EPROM des Typs 27256 (32 
KByte). Zu beachten ist hierbei, daß der Interpreter-Bereich 
($A000 bis $BFFF) in den untersten 8 KByte des EPROMs 
liegen muß. Die anderen 24 KByte können Sie mit drei ver¬ 
schiedenen Kernel-Versionen für den C 64-Modus belegen. 
Nachdem das EPROM gebrannt ist, schrauben Sie den Com¬ 
puter auf. Der betreffende Steckplatz trägt die Bezeichnung 
U32. 

Entnehmen Sie nun den Original-ROM-Baustein. Biegen 
Sie Pin 26 und 27 des 27256-EPROMs in die Waagerechte, 
so daß diese keinen Kontakt mehr mit dem Sockel haben kön¬ 
nen und setzen Sie das EPROM in den Steckplatz U32 ein. 


Bild 4. Mit dieser Schaltung lassen sich in einem EPROM sie¬ 
ben verschiedene C64-Betriebssysteme im C128 unterbringen 

Löten Sie ein Kabel an die Unterseite der Platine, und zwar an 
den Pin 26 des Steckplatzes U32. Dieses Kabel verbinden 
Sie mit dem Mittelkontakt des 3fach-Umschalters. Beschäl¬ 
ten Sie nun die beiden freien IC-Beinchen und den Umschal¬ 
ter so, wie es aus Bild 3 ersichtlich ist. 

Diese Art der Umschaltung ist nicht absturzfrei. 

In einem EPROM vom Typ 27512 lassen sich, abzüglich 
des Interpreters, der die ersten 8 KByte des EPROMs bele¬ 
gen muß, sieben verschiedene Betriebssysteme unterbrin¬ 
gen. Denkbar wären zum Beispiel das 64’er-DOS, Speeddos, 
Hypra-Kernel, das Original-Betriebssystem und ein paar auf 
den Eigenbedarf abgestimmte Varianten. 

Nachdem das EPROM gebrannt wurde, öffnen Sie den 
Computer und entfernen den Baustein U32. Biegen Sie Pin 
1, 26 und 27 des EPROMs in die Waagrechte und stecken 
das 64 KByte-EPROM in den Steckplatz U32. 

Löten Sie nun an der Unterseite der Platine einen Draht an 
den Pin 26 des Bausteins U32. Dieser Draht wird mit dem 
Mittelkontakt des 7fach-Schalters verbunden. Die Beschal¬ 
tung der frei in der Luft hängenden IC-Beinchen mit dem 
Drehschalter entnehmen Sie bitte Bild 4. 

Diese Möglichkeit der Umschaltung ist nicht absturzfrei. 

Wenn Sie auch etwas zum Thema »Tips und Tricks zur 
C128-Hardware« wissen, schreiben Sie uns doch. Wir wer¬ 
den alle Anregungen prüfen und gegebenenfalls auch ver¬ 
öffentlichen. (Franz Sauer/dm) 


Was ist CP/M? 


Noch immer gibt CP/M vielen C128-Anwendern Rät¬ 
sel auf. Was ist CP/M und wie geht man damit um? 
Wir stoßen Ihnen ein Tor in die CP/M-Welt auf. 

ie Entwicklung der Mikrocomputertechnik steckte 
Anfang der siebziger Jahre noch in den Kinderschuhen. 
Die neueste Errungenschaft war damals der Intel- 
8080-Prozessor, der Vorgänger des legendären Z80 (Zilog 
80), der auch im CI28 eingebaut ist. Es entstand bald der 
Wunsch für alle Computer, die mit dem 8080-Prozessor aus¬ 
gerüstet waren, ein einheitliches Betriebssystem zu schaf¬ 
fen. In dieser Zeit waren Computer nur zu Preisen erhältlich, 
die uns heute utopisch erscheinen. Die erste CP/M-Version 
1.4 kam 1975 auf den Markt, fand aber damals wenig Beach¬ 
tung. 1979/80 brachte Digital Research die erweiterte 
CP/M-Version 2.2 heraus. CP/M war jetzt zu einem universel¬ 
len Betriebssystem geworden, das sehr schnell Anklang 


fand. Zwar gilt auch heute noch CP/M 2.2 als Standard, doch 
wurde CP/M zur Version 3.0 weiterentwickelt, die zur Version 
2.2 voll kompatibel ist. 

Der Anwender findet beim ersten Kontakt mit CP/M zwar 
eine Menge Programme auf der Systemdiskette, versucht 
aber vergeblich, diese mit dem vielleicht gewohnten »RUN«- 
Befehl zu starten. Spätestens an diesem Punkt fällt auf, daß 
CP/M mit dem bisher bekannten C64- und C128-Modus 
wenig gemeinsam hat. Wo liegen die Gründe für dieses Phä¬ 
nomen? Wie Sie wissen, befindet sich der C128 nach dem 
Einschalten automatisch im Basic-Modus. Hier können Sie 
nach Belieben mit dem eingebauten Basic-Interpreter arbei¬ 
ten. Dieser Basic-Interpreter ist der Teil, der entweder im Dia¬ 
log oder im Programm Befehle entgegennimmt und ausführt. 
Unter CP/M steht ein derartiger Systembaustein in der 
Grundausstattung nicht zur Verfügung. Einzig und allein 
durch die Möglichkeit, Unmengen von professioneller Soft- 
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wäre einsetzen zu können, eröffnen sich dem Anwender bis¬ 
her ungeahnte Dimensionen. Wären Sie beispielsweise mit 
Ihrem CI28 auf einer einsamen Insel (Stromanschluß vor¬ 
ausgesetzt), könnten Sie ohne weiteres im C64- und 
C128-Modus eigene Programme erstellen, nicht so mit der 
CP/M-Systemdiskette. Das im Lieferumfang des C128 ent¬ 
haltene Systempaket enthält nicht einmal den eigentlich vor¬ 
gesehenen Assembler und Debugger. Natürlich können 
diese Bestandteile von CP/M nachbestellt werden. Aller¬ 
dings werden dann wieder Kosten in Höhe von 80 Mark fällig. 
Dafür erhält man aber zwei Disketten mit vielen Programmen, 
den notwendigen Assembler-Werkzeugen und ein mehrere 
100 Seiten umfassendes englischsprächiges Handbuch. 
Erst in diesem Moment können Sie die Möglichkeiten des 
Prozessors und des Betriebssystems für eigene Programme 
nutzen, falls Sie den 8080-Maschinencode beherrschen. 

Programmieren unter CP/M 


Eine der Stärken von CP/M liegt eindeutig in der Vielzahl von 
Programmiersprachen, die für dieses Betriebssystem ange- 
boten werden. Von Fortran, Cobol, Algol, Pascal und C über 
Basic und Pilot bis hin zu Lisp sind die verschiedensten 
Hochsprachen mit deren speziellen Anwendungsgebieten 
unter CP/M verfügbar. Dabei handelt es sich zum Großteil um 
sogenannte Compilersprachen. Ein Compiler übersetzt den 
Programmtext in einem oder mehreren Durchgängen in direkt 
ausführbare Programmdateien. Den Programmtext, der ent¬ 
weder mit dem Systemeditor »ED« oder einem Textverarbei¬ 
tungsprogramm (zum Beispiel Wordstar) erstellt wurde, 
nennt man auch Quellcode. Entsprechend bezeichnet man 
das ablauffähige Programm als Objektcode. 

Bei einigen dieser Compiler, speziell unter Basic, gehört 
ein Interpreter zum Lieferumfang. Der Interpreter prüft und 
übersetzt den Programmtext während des Programmablaufs 
und führt die als reservierte Standardworte erkannten 
Befehle und Funktionen aus. Der Programmtext entspricht 
dabei jedoch nicht einem direkt ablauffähigen Maschinenpro¬ 
gramm, sondern muß immer aufs neue interpretiert werden. 
Die Vorteile des Interpreters liegen in den schnellen 
Korrektur- und Testmöglichkeiten. So ist es beispielsweise 
möglich, eine Variable, einen Befehl oder eine Funktion nach¬ 
träglich einzufügen, zu löschen oder zu verändern und das 
Programm danach sofort zu starten. Wird ein Compiler ver¬ 
wendet, muß das Programm nach jeder Änderung neu compi- 
liert werden. Dies ist zwar im Hinblick auf Test und Korrektur 
sehr zeitaufwendig, das Ergebnis ist allerdings von beein¬ 
druckender Geschwindigkeit. 

Die CP/M-Organe 


CP/M ist aus drei »lebenserhaltenden« Grundelementen auf¬ 
gebaut. Diese Elemente werden für den Anwender erst inter¬ 
essant, wenn er sich näher mit dem System befaßt oder gar 
in die Assemblerprogrammierung einsteigen will. Zum ersten 
wäre hier das BDOS zu nennen. Dieser Systembestandteil 
verrichtet die Hauptarbeit. Ohne den kleinen Bruder des 
BDOS, das sogenannte BIOS, läuft aber trotzdem nicht viel. 
Das BDOS regelt den Datenfluß zwischen dem Anwender¬ 
programm und den verschiedenen Aus- und Eingabegeräten. 
Angesprochen wird das BDOS über eine Vielzahl von Num¬ 
mern, die die einzelnen Routinen repräsentieren. Vom BDOS 
werden die Daten an das BIOS übergeben, das endgültig den 
Datentransfer in die Wege leitet. Das BIOS greift auf einige 
Tabellen im Speicher zurück, in denen die wichtigsten Infor¬ 
mationen über den momentanen Systemstatus gespeichert 
sind. Der erfahrene Assemblerprogrammierer hat jederzeit 


die Möglichkeit, diese Tabellen zu verändern und seinen 
Anforderungen anzupassen. Allerdings müssen solche 
Manipulationen mit größter Umsicht durchgeführt werden, da 
es sehr schnell zu einem nicht eingeplanten Systemabsturz 
kommen kann. Der Dritte im Bunde schließlich ist der »CCP«, 
der sogenannte Control-Command-Prozessor. Der »CCP« ist 
für Ihre Eingaben zuständig. Er stellt unter anderem fest, ob 
Ihre Eingabe einen residenten oder transienten Befehl dar¬ 
stellt. Residente Befehle sind fest in das eingeladene CP/M- 
System eingebunden, während transiente immer erst von 
Diskette geladen werden müssen, bevor sie zur Ausführung 
gelangen. Unter die residenten Befehle fallen beispielsweise 
»A:...E:«, »DIR«, »ERASE«, »RENAME«, »TYPE« und »USER«. 
Die Befehle »DIR« und »TYPE« dürfen nicht mit Optionen ver¬ 
sehen werden, da sonst automatisch das transiente Äquiva¬ 
lent von Diskette eingeladen wird. Ein Beispiel hierfür wäre 
der Befehl »DIR«. Verwendet man »DIR [FULL]«, so lädt der 
CI28 das Programm »DIR.COM« ein und arbeitet die ent¬ 
sprechende Option ab. Probleme treten dann gerne auf, 
wenn man nur mit einem Laufwerk arbeitet. In diesem Fall 
könnte der C128 auf einer Arbeitsdiskette ohne »DIR.COM« 
den Befehl nicht ausführen. Man kann sich jedoch behelfen, 
indem man dem Befehl entsprechende Option »E:« voran¬ 
stellt (in diesem Fall also »E:DIR[FULLj«), Hierbei wird das 
sogenannte virtuelle Laufwerk angesprochen. Anstelle von 
Lese- und Schreibzugriffen auf eine tatsächliche Floppysta- 
tion werden diese Operationen lediglich im »RAM« ausge¬ 
führt. Das System gibt anschließend eine Aufforderung zum 
Einlegen der entsprechenden Diskette aus. CP/M 3.0 unter¬ 
stützt neben dem virtuellen Laufwerk noch vier weitere hard¬ 
waremäßige Laufwerke (A: bis D:). : 


Ausgereifte Software 


*■* 


Aufgrund der langjährigen Erfahrungen, die teilweise mit älte¬ 
ren CP/M-Versionen gemacht wurden, reiften früh entstan¬ 
dene Softwarepakete, wie etwa Wordstar 3.0, dBase II und 
Multiplan weitgehend aus. Sowohl Programm- als auch 
CP/M-Versionen wurden fortlaufend erweitert und verbes¬ 
sert. Dies kommt dem heutigen Anwender vollständig zugute. 
Er kann gewaltige Programmpakete nutzen, die sich schon 
seit einigen Jahren großer Beliebtheit erfreuen und auch 
unter MS-DOS auf IBM-Computern und kompatiblen Geräten 
verfügbar sind. 


Public-Domain-Software 


Wie kaum unter anderen Betriebssystemen, hat sich unter 
CP/M und MS-DOS (einem erweiterten Äquivalent für IBM- 
Computer und kompatible Geräte) im Laufe der Jahre ein gro¬ 
ßes Kontingent an sogenannter Public-Domain-Software 
herausgebildet. Das Besondere an dieser Art von Software 
ist, daß sie von Anwendern für Anwender geschrieben 
wurde. Es fehlt hier völlig die sonst übliche kommerzielle Ver¬ 
marktung mit Preisen für den großen Geldbeutel. Hauptsäch¬ 
lich in den Vereinigten Staaten von Amerika erhält man Public- 
Domain-Software unter CP/M, sei dies nun in Form des soge¬ 
nannten »Download« bei speziellen Mailboxen, über User- 
Groups oder auch über Softwarehändler, die häufig sehr viele 
dieser Public-Domain-Programme »in Bausch und Bogen« 
vertreiben. Das Terminal-Programm »KERMIT« hat sich bei¬ 
spielsweise als Public-Domain-Programm einen Namen 
gemacht. Es besteht die Hoffnung, daß sich das Gebiet der 
Public-Domain-Software nach der Renaissance des Be¬ 
triebssystems CP/M durch den Commodore 128 und die 
CP/M-fähigen Schneider-Computer auch in Deutschland 
durchsetzen wird. (bj/rf) 
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Tips&Tricks zu CP/M 


Hier finden Sie tolle Neuigkeiten und eine Menge 
Anregungen, mit denen Sie CP/M in den Griff 
bekommen und dessen Vorteile voll ausnutzen 
können. 

N achdem man sich als CP/M-Einsteiger durch das sehr 
dürftig ausgefallene Handbuch von Commodore gear¬ 
beitet hat, wird zwar klar, daß es sich hier um ein Be¬ 
triebssystem handeln muß, welches mit dem C128 und C 64 
nichts zu tun hat. Es bleiben für den Einsteiger wie auch für 
den Profi viele Fragen offen. »Tips & Tricks zu CP/M« zeigt wei¬ 
terführende Anwendungsmöglichkeiten von CP/M auf, die 
sich nicht auf das Kopieren von Dateien mit »PIP« beschrän¬ 
ken. 

Submit - oder so ähnlich... 


Im Handbuch stößt man irgendwann einmal darauf. »SUB- 
MIT.COM« und »PROFILE.SUB« werden dort in der gewohnt 
mageren Art und Weise beschrieben. Die eigentliche 
Arbeits- und Wirkungsweise bleibt im Dunkeln verborgen. 
Also werden wir etwas Licht ins »SUBMIT«-Dunkel bringen. 
»SUBMIT« ist ein Programm auf der CP/M-Systemdiskette, 
mit dem mehrere »COM«-Files nacheinander und ohne 
Unterbrechung abgearbeitet werden können. Natürlich muß 
dem Computer irgendwie mitgeteilt werden, welche Pro¬ 
gramme er in welcher Reihenfolge abarbeiten soll. Da man am 
besten an einem Beispiel lernt und versteht, betrachten wir 
eine mögliche Anwendung von »SUBMIT« etwas genauer. 

Man stelle sich den für einen CP/M-Programmierer klassi¬ 
schen Fall vor: Ein Programm wird im Quellcode eingetippt, 
compiliert, eventuell assembliert und gelinkt. Es wäre eine 
echte Arbeitserleichterung, wenn man nicht jedesmal die ein¬ 
zelnen Programme aufrufen müßte, sondern diese automa¬ 
tisch nacheinander geladen würden. »SUBMIT« bietet genau 
diese Möglichkeiten. Nehmen wir an, Sie haben den Quell¬ 
code eines Programms in einer Datei namens »PRG.C«. Bei 
der letzten Compilation tauchte ein Fehler auf und es soll neu 
editiert und umgewandelt werden. Um sich nun das einzelne 
Starten der Compiler-Teile zu sparen, erstellt man als erstes 
die »SUBMIT«-Datei, entweder mit dem CP/M-Editor oder 
einer Textverarbeitung. Der erstellte Text sieht folgenderma¬ 
ßen aus: 

ED PRG.C 
CC PRG 
MAC PRG 
LNK PRG 

Diese Datei erhält den Namen »COMPILE.SUB«. Das Kür¬ 
zel »SUB« ist für die Arbeit mit »SUBMIT« zwingend notwen¬ 
dig. Das Ganze wird mit »SUBMIT COMPILE« gestartet. Als 
erstes wird der Editor (ED) mit der Datei PRG.C geladen. 
Nachdem die Änderung durchgeführt und der Editor nach 
dem Speichern wieder verlassen wird, tritt automatisch der 
Compiler (CC) in Aktion und compiliert die Quelldatei PRG.C. 
In derselben Weise agieren im Anschluß der Assembler 
(MAC) und der Linker (LNK). Wohlgemerkt, alle Programme 
werden automatisch gestartet, gesteuert durch »SUBMIT«. 
Natürlich müssen sich alle angesprochenen Programme und 
Dateien auf derselben Diskette befinden. 

Eine weitere Anwendung wäre die komplette Steuerung 
von zusammenhängenden Programmabläufen. Für umfang¬ 
reiche Anwendungen sind meist mehrere Programme not¬ 


wendig, um das gewünschte Ergebnis zu erhalten. Ein Bei¬ 
spiel wäre die Lagerverwaltung. Man benötigt Programme zur 
Datenerfassung, Datenauswertung und Datenaktualisierung. 
Da diese Programme, um Fehler zu vermeiden, nicht wahllos 
durcheinander gestartet werden dürfen, wird der genaue 
Programmablauf in einer »SUB«-Datei festgehalten und mit 
»SUBMIT« gestartet. 

Doch bleiben wir vorerst bei unserem Compiler-Beispiel. 
Was nützt es, wenn die Programmaufrufe nicht variabel 
gehalten werden können, wenn man für jedes neue Pro¬ 
gramm eine eigene »SUB«-Datei erstellen muß? Natürlich bie¬ 
tet »SUBMIT« diesen Komfort. Es sind bis zu neun Variable 
möglich. Zugelassen ist wieder jedes ablauffähige COM-File. 
Die Variable werden in einer besonderen Form angegeben: 
als erstes ein Dollarzeichen und dann die Nummer der jeweili¬ 
gen Variable. Die zu übergebenden Werte werden im »SUB- 
MIT«-Aufruf mit angegeben. Dazu wieder ein kleines Beispiel. 
Als erstes sollen alle Dateien angezeigt werden, die 
Assembler-Quellcode enthalten (Dateikennung: ÄSM). 
Danach wird die angegebene Datei assembliert und gelinkt. 
Ist dies erfolgreich abgeschlossen, werden die überflüssi¬ 
gen, aus der Assemblierung entstandenen Dateien mit geän¬ 
dertem Namen auf ein anderes Laufwerk kopiert. Auf der Ori¬ 
ginaldiskette werden diese Dateien (Dateienkennung: 
SYM,PRN) gelöscht und das Inhaltsverzeichnis der Diskette 
auf den Bildschirm gebracht. Um diese bereits relativ 
umfangreiche Aktion mit »SUBMIT« auszuführen, wird fol¬ 
gende SUB-Datei benötigt: 

DIR * *SM 
MAC $1 
HEXCOM $1 
PIP 

<B:$2.SYM = A:$1.SYM 
<B:$2.PRN = A:$1.PRN 
< 

ERA $1.PRN 
ERA $1.SYM 
DIR 

Um die allgemeine Verwirrung nicht noch zu steigern, folgt 
eine ausführliche Erklärung der obigen Datei. Die Datei wird 
mit dem Namen »TEST.SUB« gespeichert. Vergewissern Sie 
sich immer vor einem »SUBMIT«-Aufruf, daß alle angeforder¬ 
ten Programme auf der entsprechenden Diskette vorhanden 
sind. Nehmen wir an, das Assemblerprogramm »DISK.ASM« 
soll assembliert werden und die zu kopierenden Dateien sol¬ 
len die Namen »DRUCK.SYM« und »DRUCK.PRN« erhalten. 
Um das gewünschte Ergebnis zu erhalten, wird »SUBMIT« 
folgendermaßen aufgerufen: 

SUBMIT TEST DISK DRUCK 

Der erste Parameter nach »SUBMIT« gibt die auszufüh¬ 
rende SUB-Datei an. Alle weiteren Parameter werden den in 
der SUB-Datei verwendeten Variablen zugeordnet. So erhält 
im Beispiel $1 den Wert DISK und $2 den Wert DRUCK. Tipp¬ 
fehler in bezug auf die Variablen nimmt »SUBMIT« sofort übel. 
Noch vor der Ausführung wird die Prozedur auf Ihre Syntax 
überprüft. Leider überprüft »SUBMIT« nicht, ob alle verlang¬ 
ten Dateien und Programme auf den entsprechenden Lauf¬ 
werken zur Verfügung stehen. Hier wären wir bei einem klei¬ 
nen Manko angelangt. Es gibt keine Möglichkeit, eventuelle 
durch Falscheingaben auftretende Fehler abzufangen. Wenn 
beispielsweise statt »DISK« versehentlich »DIS« eingegeben 
wird, werden alle Programme der SUB-Datei normal gestar¬ 
tet, brechen aber nach kurzer Zeit mit den programminternen 
Fehlermeldungen ab. Danach wird das nächste Programm 
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gestartet und bricht ebenfalls mit einer wüsten Fehlermel¬ 
dung ab. Dieses Spiel treibt »SUBMIT«, bis die gesamte SUB- 
Datei abgearbeitet ist. Für den Anwender zeigt sich CP/M 
hier von seiner unfreundlichen Seite, doch keine Angst, die 
Daten auf den eingelegten Disketten nehmen durch solche 
Fehleingaben keinen Schaden. 

Vorausgesetzt die SUB-Datei ist in Ordnung, erscheint am 
Bildschirm als erstes eine Auflistung aller »ASM«-Dateien. 
Danach wird automatisch der CP/M-Assembler »MAC« gela¬ 
den, der die auf die Variable »$1« zugewiesene Datei assem- 
bliert. Die im »SUBMIT«-Aufruf angebene Datei muß dazu mit 
der Dateikennung »ASM« in Laufwerk A zu finden sein. »MAC« 
erstellt sodann die Dateien »DISK.HEX«, »DISK.PRN« und 
»DISK.SYM«. Von »HEXCOM«, das als nächstes geladen 
wird, wird ein ablauffähiges »COM«-File mit dem Namen 
»DISK.COM« erstellt. Die nächsten beiden Anweisungen der 
»SUB«-Datei benötigen eine formatierte Diskette in Laufwerk 
B. Dorthin werden die Dateien »DISK.PRN« und »DISK.SYM« 
kopiert. Diese neuen Dateien erhalten die Namen der zweiten 
Variablen »$2« und zwar »DRUCK.PRN« und »DRUCK.SYM«. 
Die nächste Anweisung in der kleinen »SUB«-Datei offenbart 
wieder eine kleine Besonderheit von »SUBMIT«: Nach dem 
Programmaufruf, in diesem Fall »PIP«, werden die benötigten 
Parameter in der »SUB«-Datei angegeben. Derartige Einga¬ 
ben werden mit einer nach rechts geöffneten spitzen Klam¬ 
mer gekennzeichnet. Im obigen Beispiel werden die Druck- 
und Symboldatei auf Laufwerk B kopiert. Die letzte Klammer 
ohne Parameter kennzeichnet für PIP das Ende der Opera¬ 
tion. Zum Schluß werden noch die Dateien »DISK.SYM« und 
»DISK.PRN« auf der Arbeitsdiskette in Laufwerk A gelöscht, 
da diese auf Laufwerk B gesichert wurden. Nach der Aus¬ 
gabe des Disketteninhaltsverzeichnisses beendet »SUBMIT« 
seine Arbeit und überläßt die Kontrolle über das System wie¬ 
der dem Anwender. Nun wissen Sie, wie man mit »SUBMIT« 
arbeitet. Doch das Rätsel um das im Handbuch so mager 
beschriebene »PROFILE.SUB« ist immer noch nicht gelüftet. 
Der Aufbau entspricht genau dem der bereits ausführlich 
besprochenen »SUB«-Datei. Doch nun zum eigentlichen 
Sinn der »PROFILE.SUB«. Beim »Booten« von CP/M sucht 
das Betriebssystem, bevor es die Kontrolle an den CCP 
(Kommandoprozessor) übergibt, als erstes die Datei »PRO¬ 
FILE.SUB« auf der Systemdiskette. Findet CP/M diese Datei, 
geschieht genau dasselbe, als wenn »PROFILE.SUB«, was 
auch ohne weiteres möglich ist, mit »SUBMIT« aufgerufen 
würde. Die dort angegebenen Programme werden geladen 
und ausgeführt. Für den Aufbau der Datei gelten die gleichen 
Bedingungen, wie für eine entsprechende durch »SUBMIT« 
aufzurufende Datei. Wo aber liegt der Nutzen für den Anwen¬ 
der? Die Vorteile liegen auf der Hand. Man kann beispiels¬ 
weise beim Laden des Systems sofort das Datum setzen 
lassen, sowie die Tastaturkonfiguration ändern. Natürlich 
können alle zur Verfügung stehenden »COM«-Files aufgeru¬ 
fen werden. Eine weitere Möglichkeit wäre das Anfertigen 
von Sicherheitskopien unmittelbar nach dem Laden des 
Systems. Werden auf einer Diskette im Laufe einer Sitzung 
Dateien verändert, erweist sich dies oft als nützlich. Die Pro¬ 
bleme, die das magere Handbuch gerade mit »SUBMIT« und 
der Datei PROFILE.Sub aufwirft, sind jetzt hoffentlich aus 
dem Weg geräumt, so daß einer effektiven Nutzung dieser 
komfortablen CP/M-Einrichtungen nichts mehr im Wege 
steht. 

Die Sache mit den Usern 


Wenn CP/M gebootet wird, befindet man sich automatisch in 
der User-Ebene Null (User=Benutzer, Anwender). Was hat 
es nun mit den anderen User-Bereichen, es gibt deren 16 
(0-15), auf sich? Werden in einem anderen User-Bereich 


Daten gespeichert, legt CP/M ein weiteres Inhaltsverzeichnis 
für diese Ebene an. Die dort untergebrachten Daten können 
nur unter dieser User-Nummer bearbeitet werden. Wollen Sie 
beispielsweise unter Ebene drei arbeiten, so geben Sie ein¬ 
fach »USER« ein. Der Computer fragt dann nach der 
gewünschten Nummer. 

Wie können nun diese User-Bereiche sinnvoll eingesetzt 
werden? Wenn sich nicht alles im Bereich Null abspielen soll, 
bietet sich hier die Möglichkeit an, etwas Organisation auf die 
Diskette zu bringen. So kann man beispielsweise im Bereich 
Null das System zum Booten speichern. Will man mit Word¬ 
star und dBase auf einer Diskette arbeiten und dBase- 
Dateien in Wordstar laden, hat man die Möglichkeit, für dBase 
und Wordstar je einen eigenen Benutzerbereich anzulegen. 

Der Trick mit »SYS« 


Leider kann auf Dateien von anderen Benutzerebenen nicht 
ohne weiteres zugegriffen werden. Doch auch dafür gibt es 
eine Lösung. Eine solche gemeinsame Datei muß sich in der 
Bedienerebene Null befinden. Zusätzlich muß dieser Datei 
mit dem »SET«-Kommando ein »SYS«-Attribut zugeordnet 
werden, damit diese als bereichsübergreifende Systemdatei 
erkannt wird. Dazu ein Beispiel, in dem die oben erworbenen 
Kentnisse zu »SUBMIT« benötigt und vertieft werden. Als 
erstes muß natürlich die verwendete Diskette entsprechend 
vorbereitet werden. Das Ergebnis soll folgendermaßen aus- 
sehen: In der Benutzerebene Null liegt das System, sowie die 
dBase beiliegende Beispieldatei »BUECHER.DBF«. In den 
User-Bereich eins kopiert man alle nötigen Dateien, die zum 
korrekten Ablauf von dBase benötigt werden. Zu guter Letzt 
wird die Ebene zwei mit den nötigen Dateien zu Wordstar ver¬ 
sorgt. Dann kann es praktisch schon losgehen. Doch anstatt 
jetzt umständlich zwischen den User-Ebenen hin und her zu 
schalten, werden wir für diesen Zweck eine, diesmal etwas 
größere, »SUBMIT«-Datei aufbauen (Bild 1). Diese »SUBMIT«- 
Datei soll nun folgenden Vorgang bearbeiten: Die Datei »BUE¬ 
CHER.DBF« wird als erstes in der Benutzerebene eins auf die 
von Wordstar zu lesende Datei »TESTTXT« umgewandelt. 
Dazu muß in dBase nach dem Eröffnen der Datei mit »USE« 
folgende Anweisung erteilt werden: 

COPY TO TEST DELIMITED WITH, 

Damit wäre die Datei »TESTTXT« erstellt. Danach muß die¬ 
ses File in die Benutzerebene Null kopiert und mit dem Attri¬ 
but »SYS« für Systemdatei versehen werden. Diese Aufgabe 
erledigt das »SET«-Kommando. Nun tritt in Bereich zwei 
Wordstar in Aktion. Zur Demonstration genügt es, wenn eine 
Zeile der eingelesenen Datei »TESTTXT« verändert wird. 

Nach dem Verlassen von Wordstar wird die Datei wieder in 
Bereich Null kopiert und mit dem »SYS«-Attribut versehen. 
Wo aber ist der praktische Nutzen dieses Beispiels zu sehen? 


user 0 

era test.txt 

era test.txt 

user 2 

b:set buecher.dbf[rw,sys] 

WS 

user 1 

user 0 

dbase 

era test.txt 

<$1 

pip a:=a:test.txt[g2] 

user 0 

b:set test.txt[rw,sys] 

pip a:=a:test.txt[g1] 

user 2 

b:set test.txt[rw,sys] 

era test.txt 

user 1 

user 0 


Bild 1. SUB-Datei mit allen Schikanen 
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Directory For Drive B: User 0 





Name 


Bytes 

Rees 

Attributes 

Prot Update 

Create 

BUECHER 

DBF 

6k 

44 

Sys RW 

None 


CCP 

COM 

4k 

25 

Dir RW 

None 


CPM + 

SYS 

24k 

184 

Dir RW 

None 


D 

TXT 

Ok 

0 

Dir RW 

None 08/05/86 03:13 

08/05/86 12:58 

PIP 

COM 

10k 

68 

Dir RW 

None 


SUBMIT 

COM 

6k 

42 

Dir RW 

None 


TEST 

BAK 

2k 

3 

Dir RW 

None 08/05/86 04:07 

08/05/86 12:59 

TEST 

SUB 

2k 

3 

Dir RW 

None 08/05/86 01:58 

08/05/86 02:12 

TEST 

TXT 

2k 

11 

Sys RW 

None 08/05/86 10:12 

08/05/86 10:12 

Total Bytes 


= 

56k 

Total Records = 

380 Files Found = 

9 

Total 1 k Blocks 

= 

52 

Used/Max Dir Entries For Drive B: 25/ 128 

Directory For Drive B: User 1 





Name 


Bytes 

Rees 

Attributes 

Prot Update 

Create 

DBASE 

COM 

20k 

158 

Dir RW 

None 


DBASEMSG 

TXT 

60k 

475 

Dir RW 

None 


DBASEOVR 

COM 

42k 

328 

Dir RW 

None 


Total Bytes 


= 

122k 

Total Records = 

961 Files Found = 

3 

Total 1 k Blocks 

= 

121 

Used/Max Dir Entries For Drive B: 25/ 128 

Directory For Drive B: User 2 





Name 


Bytes 

Rees 

Attributes 

Prot Update 

Create 

WS 

COM 

16k 

128 

Dir RW 

None 


WSMSGS 

OVR 

26k 

194 

Dir RW 

None 


WS0VLY1 

OVR 

34k 

266 

Dir RW 

None 


Total Bytes 


= 

76k 

Total Records = 

588 Files Found = 

3 

Total 1 k Blocks 

— 

75 

Used/Max Dir Entries For Drive B: 25/128 


Bild 2. Informatives Inhaltsverzeichnis mit DIR 


Wenn Sie bestimmte Daten aus dBase-Dateien in Wordstar- 
Briefen verwenden wollen, können Sie so auf die dBase- 
Daten zugreifen. Wie das genau funktioniert, entnehmen Sie 
bitte der CP/M-Ecke aus der 64’er-Ausgabe 7/86. Doch nun 
wieder zum Ablauf der »SUBMIT«-Datei. Als erstes wird, falls 
nicht aktiv, User Null eingeschaltet. Die dort eventuell vorhan¬ 
dene Datei »TESTTXT« wird gelöscht, um mögliche Schreib- 
Lesefehler zu vermeiden. Um von verschiedenen Benutzer¬ 
bereichen auf »BUECHER.DBF« zugreifen zu können, muß 
diese Datei mit dem »SYS«-Attribut ausgestattet werden, was 
mit dem folgenden Set-Befehl erreicht wird. In Laufwerk B 
muß sich in diesem Fall die Systemdiskette befinden oder 
eine beliebige andere Diskette, die das Programm »SET« ent¬ 
hält. Nachdem dann in User Eins umgeschaltet ist, wird dort 
dBase geladen. Haben Sie beim Aufruf der SUB-Datei ein 
Datum mit angegeben, so wird dies automatisch durch $1 
gesetzt, ansonsten wird die Datumseingabe übergangen. 
Sobald sich dBase mit dem Prompt (Punkt) meldet, führen Sie 
den oben angegebenen »COPY«-Befehl durch. In Ebene 
zwei haben Sie damit eine Datei Namens »TESTTXT« erzeugt. 
Nachdem dBase mit »QUIT« verlassen wurde, kopiert »PIP« 
diese Datei in die Ebene Null, wo sie mit Hilfe von »SET« das 
SYS-Attribut erhält. Um Speicherplatz zu sparen, erfolgt als 
nächstes die Löschung der Datei »TESTTXT« im Benutzer¬ 
bereich eins. Nachdem in Ebene zwei geschaltet ist, wird 
sofort Wordstar geladen. Laden Sie zunächst »TESTTXT« und 
verändern Sie einen beliebigen Satz. Nachdem Wordstar 
wieder verlassen ist, wird in Ebene Null die alte Testdatei 
gelöscht und die neue aus Ebene zwei herauskopiert. Nach¬ 
dem sie dort wieder als Systemdatei gekennzeichnet ist, wird 
die Datei in Ebene zwei gelöscht und in den Bereich Null 
zurückgesprungen. Damit sollten jetzt alle noch bestehen¬ 
den Probleme mit »SUBMIT«-Dateien und User-Bereichen 

assta? 


gelöst und einer sinnvollen Anwendung dieser mächtigen 
CP/M-Komponenten nichts mehr im Wege stehen. 

Timestomps, Initdir und Set 


Diese drei sehr interessanten CP/M-Befehle bieten ein opti¬ 
males Werkzeug für die interne Verwaltung der Diskettenda¬ 
teien. Die Möglichkeiten reichen von Datums- und Zeitproto¬ 
kollierung der einzelnen Zugriffe bis hin zum Paßwortschutz 
für einzelne Dateien, Label und sogar des Systems. Wie kom¬ 
fortabel und hilfreich diese Optionen sein können, lernt man 
erst nach längerer Anwendung zu schätzen. So erhält man 
jederzeit Auskunft über die letzten Dateizugriffe und kann 
somit auch die große Palette der »DIR«-Optionen nützen. 
Doch jetzt zur näheren Erklärung und Beschreibung dieser 
Eigenschaften. Die Eintragung der sogenannten Time- 
stamps, das sind die Zeit- und Datumseinträge, ist leider im 
Handbuch nicht sehr ausführlich beschrieben. Denn allein 
mit dem Kommando »INITDIR« ist es noch lange nicht getan. 
Zwar wird mit diesem Systemprogramm die Diskette für die 
Aufnahme von Timestamps vorbereitet, doch ganz ohne das 
Programm geht es auch wieder nicht. Also nicht vergessen, 
als erstes immer mit »INITDIR« die Diskette initialisieren. Die 
Timestamps können mit dem Kommando »DIR[DATEj« aus¬ 
gegeben werden. Doch ein Versuch nach »INITDIR« führt 
lediglich zu einer Fehlermeldung, die besagt, daß die Diskette 
gar nicht für Timestamps vorbereitet ist. Was soll denn das? 
Die Diskette ist zwar für Einträge vorbereitet, aber die dafür 
vorgesehene Funktion des Systems ist noch nicht aktiviert. 
Dazu haben wir zum Glück ein Allround-Programm mit Namen 
»SET« zur Verfügung. Diese Funktionen werden speziell zum 
Setzen derzeit- und Datumskennungsart benötigt. Drei Mög- 
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lichkeiten stehen zur Verfügung: Datum und Zeit der Entste¬ 
hung soll festgehalten werden (Set[create=on]); Einträgen 
des letzten Dateizugriffs bei Dateien mit dem Read-Write- 
Attribut (Set[access=on]) und die Speicherung der Zeitda¬ 
ten über die letzte Dateiveränderung (Set[update=on]). 
Doch Vorsicht, Create und Access schalten sich gegenseitig 
aus! Mit Update wird nur ein Zeiteintrag gemacht, wenn die 
Datei effektiv verändert wurde. Bei einem reinen Lesezugriff 
erfolgt bei Update keinerlei Aktion. Eine Diskette, die mit 
»INITDIR« initialisiert wurde und mit »SET[CREATE=ON, 
UPDATE=ON|« für Zeit- und Datumseinträge vorbereitet 
wird, gibt schließlich mit der entsprechenden »DIR«-Option 
ein optisch ansprechendes und vor allem informatives Bild ab 
(Bild 2). Ein Inhaltsverzeichnis dieser Art erhalten Sie, nach¬ 
dem die Diskette für Zeit- und Datumseinträge aktiviert wurde 
und dann mit folgendem »DIR«-Befehl abgerufen wird: 

DIR[DATE,USER=ALL,NOPAGE] 

Sieht doch schon richtig professionell aus, oder etwa 
nicht? Der von CP/M erhobene Anspruch auf Professionalität 
muß sich schließlich irgendwo bestätigen. 

»SET« kann noch einiges mehr. Eine der Optionen, die vor 
allem für Leute mit Top-Secret-Daten interessant ist, präsen¬ 
tiert sich mit einem vielfältigen Paßwortschutz in vielen Ebe¬ 
nen. Dafür sind allerdings ausnahmsweise genügend Infor¬ 
mationen im Handbuch zu finden, so daß darauf hier nicht 
näher eingegangen werden muß. 

Was nicht im Handbuch steht 


Allerdings ist der Paßwortschutz nur dann lOOprozentig, 
wenn das Directory-Label mit einem solchen versehen ist. In 
diesem Fall besteht keine Möglichkeit, den Schutz mit »SET 
[PROTECT=OFF]« auszuschalten, da immer wieder das 
lästige Paßwort abgefragt wird. Andernfalls können nach dem 
Abschalten des Schutzes alle Dateien ohne Probleme bear¬ 
beitet werden. Leider ist der Mensch nicht unfehlbar. Daher 
kommt es immer wieder vor, daß ein Paßwort vergessen wird. 
Handelt es sich dabei um den Schutz für das Disketten-Label, 
kommt anscheinend jede Hilfe zu spät. An diesem Punkt wei¬ 
chen wir total von der CP/M-Linie ab und wenden uns dem 
guten alten C64 zu. C64 und CP/M 3.0? Wer einen guten 
Diskettenmonitor für den C 64 besitzt, ist aus dem Schneider. 
Denn, man will es beinahe nicht glauben, damit können auch 
CP/M-Disketten bearbeitet werden. Eine ideale Vorausset¬ 
zung, um der eigenen Vergeßlichkeit ein Schnippchen zu 
schlagen. Allerdings ist eine CP/M-Diskette anders auf¬ 
gebaut als die des C64. Sollte jemand auf die Idee 
kommen, die Directory in Block 18 zu suchen, wird er eine 
herbe Enttäuschung erleben. Das CP/M-lnhaltsverzeichnis 
findet sich immer in der den Systemblöcken unmittelbar fol¬ 
genden Spur, also in Spur eins oder zwei. Dort liegt in den 
Sektoren null bis acht das eigentliche Directory. Bei der Edi- 
tierung der entsprechenden Blöcke taucht auf dem Bild¬ 
schirm ein wahrer Zeichenwirrwarr auf. Das sollte aber nicht 
weiter stören. Die Namenseinträge sind ohne weiteres zu fin¬ 
den. Soll nur das Paßwort einer bestimmten Datei gelöscht 
werden, fährt man in Sektor 15 oder 20 an den Anfangsbuch¬ 
staben und füllt mindestens 23 Byte mit dem Hexadezimal¬ 
wert E5. Versuchen Sie nicht Ihr Paßwort zu finden, dieses 
befindet sich verschlüsselt hinter dem Dateinamen. Genauso 
wird das Paßwort für das Disketten-Label gelöscht. Dabei 
wird allerdings auch der Diskettenname überschrieben. Der 
kann dafür ohne Paßwort-Probleme neu angelegt werden. 
Sollten jetzt einige Hacker glauben, die Anschaffung von 
CP/M wäre eine lohnende Sache, schließlich kann endlich 
der Kopierschutz gebrochen werden, kann man nur einen der 
großen Vorteile der CP/M-Software erwidern: Ein Großteil der 
auf dem Markt erhältlichen Programme sind ohne jeglichen 


Kopierschutz erhältlich. Von der angebotenen Public-Do- 
main-Software ganz zu schweigen. 

Was tun mit dem Editor? 


Ein vieldiskutiertes Thema ist und bleibt der zum System 
gelieferte Editor. Dieses Monstrum an angeblicher Eingabe¬ 
hilfe erweist sich bereits nach dem ersten Laden als völlig 
unkomfortabel. Dazu muß gesagt werden, daß dieser Editor 
aus den Anfangszeiten von CP/M stammt. Damals war das 
Fortschritt. Heute kann man ohne »ED« auskommen, wenn 
Software wie Wordstar und Turbo-Pascal zur Verfügung 
steht. Diese Editoren bieten nicht nur einen sehr hohen Kom¬ 
fort, sondern erzeugen ASCII-Dateien, die von jedem Compi¬ 
ler verarbeitet werden. Der Programmierer kann hier auf alle 
Vorteile der Textverarbeitung zurückgreifen, ohne sich son¬ 
derliche Nachteile einzuhandeln. Für diejenigen, die sich 
trotzdem mit dem CP/M-Editor zufriedengeben müssen, ein 
paar Hinweise und nähere Erläuterungen. Geladen wird der 
Editor mit angehängtem Dateinamen. Ist die angehängte 
Datei noch nicht auf Diskette, wird automatisch ein neues File 
angelegt. Ansonsten wird die gewünschte Datei geöffnet. 
Wohl gemerkt, sie wird nur geöffnet. Wenn direkt nach dem 
Aufruf einer der List-Befehle des ED angewandt wird, pas¬ 
siert nichts. Die Begründung liegt in der Natur des ED. Er ist 
ein sogenannter zeilenorientierter Editor. Das heißt, der Text 
kann nur zeilenweise bearbeitet werden. Full-Screen- 
Editoren dagegen lassen ein Bewegen des Cursors an eine 
beliebige Stelle des Bildschirms zu. Weiterhin arbeitet der 
CP/M-Editor mit Datenpuffern. Dieser Datenpuffer ist ledig¬ 
lich ein Speicherbereich, in dem der Text zwischengespei¬ 
chert wird. Es wird also nicht auf der Diskette gearbeitet, son¬ 
dern direkt im freien Speicherplatz. Nach dem Starten des ED 
mit Dateinamen ist dieser Speicher prinzipiell leer. Mit dem 
Editorbefehl # A wird der Puffer von der Diskette mit Daten 
versorgt. Erst dann kann der Anwender den angeforderten 
Text bearbeiten. Doch Vorsicht! Verwenden Sie nicht sofort 
die Einfügeanweisung »I«. Der ED-interne Zeilenzeiger steht 
nach dem Laden des Textes immer auf Zeile eins. Um ans 
Text- beziehungsweise Pufferende zu springen, muß der 
Cursor erst mit der Anweisung »-B« auf das Ende gestellt wer¬ 
den. Danach kann dann mit dem Einfügen begonnen werden. 
Ein weiteres Problem stellt die Positionierung des Cursors 
innerhalb einer Zeile dar. Eine eingegebene Zeile kann leider 
nicht ohne weiteres editiert werden. Sie wollen beispiels¬ 
weise folgende Zeile ändern: »Sehr gehrte Damen und Her¬ 
ren,«. Dazu muß erst auf der entsprechenden Stelle positio¬ 
niertwerden, um ein »e« einzugeben. Positioniert wird auf den 
Buchstaben, nach dem etwas eingefügt wird. In diesem Fall 
lautet der Befehl »7C«. Jetzt kann mit »I« der fehlende Buch¬ 
stabe erfaßt werden. Die editierte Zeile muß mit »CONTROL- 
Z« verlassen werden. Erfolgt der Abbruch mit »RETURN« 


Byte 

Beschreibung 

0 

Laufwerksnummer 

1 - 8 

Dateiname 

9-11 

Extension 

12 

Nummer des Eintrags 

13 - 14 

Intern reserviert 

15 

abgelegte Records 

16 - 31 

Nummern der für die Datei belegten 

Blöcke 

32 

nächster Record 

33-34 

absoluter Record bei Direktzugriff 

35 

Überlauf-Flag für BDOS-Funktion 35 


Bild 3. Der FCB-Block von CP/M 
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hängt der ED ein Zeilenendezeichen an. ED schneidet den 
hinteren Teil der Zeile ab und bildet mit dem Rest eine neue 
Zeile. Zum Löschen existieren zwei Befehle. Die Anweisung 
»K« löscht innerhalb einer Zeile, während mit »D« ganze Zeilen 
gelöscht werden. Wenn es bei diesen beiden Anweisungen 
zu Verwechslungen kommt, wird der Text stark verändert. 
Man wirft besser doch noch einen Blick ins Handbuch, um 
solche nervenaufreibenden Fehler zu vermeiden. 

Die Innereien 


Vor allem jene, die gerne mehr über ein System wissen oder 
es gar manipulieren wollen, finden im folgenden nützliche 
Hinweise. 

Ein Directory-Eintrag unter CP/M kann höchstens 16 
KByte Diskettendaten verwalten. Für alle weiteren angefan¬ 
genen 16 KByte ist jeweils ein weiterer Directory-Eintrag von¬ 
nöten. Sicher haben Sie schon einmal bemerkt, daß es nach 
einem Diskettenwechsel länger als normal dauert, die Direc¬ 
tory auszulesen. Dafür gibt es eine systembedingte Erklä¬ 
rung. Im Arbeitsspeicher des Computers befindet sich der 
sogenannte File-Control-Block (FCB), in den ein Directory- 
Eintrag aufgenommen wird. Im FCB (Bild 3) sind beispiels¬ 
weise die Laufwerksnummer, der Dateiname, die Anzahl der 
abgelegten Records oder die Nummer des aktuellen 
Records gespeichert. Er repräsentiert praktisch den momen¬ 
tan aktuellen Zustand einer in Bearbeitung befindlichen 
Datei. 

Ohne dieses Modul läuft unter CP/M absolut nichts. Das 
BDOS ist der fleißigste Arbeiter im System. Vor allem für den 
Assemblerprogrammierer bietet das BDOS Möglichkeiten, 
die eine effektive Programmierung mit minimalem Aufwand 
erlauben. Aufgebaut ist das BDOS aus einer Menge von ein¬ 
zelnen Funktionen, die Ein-/Ausgabe zwischen den einzel¬ 
nen Geräten steuern. Jede Funktion hat ihre eigene Nummer, 
unter der sie im Maschinenprogramm aufgerufen werden 
kann. Die Einsprungadresse ins BDOS ist $0005 hexadezi¬ 
mal. Die Nummer der gewünschten Funktion wird in einem 
Register übergeben, ebenso die Adresse der zu bearbeiten¬ 
den Speicherstelle. Der Assemblerprogrammierer muß sich 
um keine einzige Ein-/Ausgaberoutine kümmern. Er hat nur 
dafür zu sorgen, daß die richtigen Parameter der gewählten 
Funktion übergeben werden. Im Anschluß folgt eine Über¬ 
sicht der BDOS-Funktionen. 



Die BDOS-Funktionen 


Als erstes wird die Funktionsnummer genannt, danach die Bedeutung 
und die benötigten Parameter. 

0 System Reset 

Warmstart; Rücksprung zum System. 

1 

Parameter: 00H 

Console Input 

liest ein Zeichen von der Konsole. 

in Register: 

C 


Parameter: 01H 

in Register: 

C 

2 

Gedrücktes Zeichen: 

Console Output 

Gibt ein Zeichen auf den Bildschirm aus. 

in Register: 

A 


Parameter; 02H 

in Register: 

C 

3 

Auszugebendes Zeichen: 

Auxiliary Input 

Liest ein Zeichen aus dem AUXIN-Kanal. 

in Register: 

E 


Parameter: 03H 

in Register: 

C 

4 

Gelesenes Zeichen: 

Auxiliary Output 

Legt ein Zeichen auf den AUXOUT-Kanal. 

in Register: 

A 


Parameter: 04H 

in Register: 

C 

5 

Auszugebendes Zeichen: 

List Output 

Gibt ein Zeichen auf den Drucker aus. 

in Register: 

E 


Parameter: 05H 

in Register: 

C 


Auszugebendes Zeichen: 

in Register: 

E 


sollte nicht verwendet werden 
Auxiliary Input Status 
Zeichen zur Eingabe an AUXIN? 

Parameter: 07 H in Register: C 

Ergibt in Register A: FFH für ja 

00H für nein 

Set lobyte 

Zeichen zur Ausgabe an AUXOUT? 

Parameter: 08H in Register: C 

Ergibt in Register A: FFH für ja 

00H für nein 

Print String 

String, mit $ abgeschlossen, auf den Bildschirm ausgeben. 


10 


11 


12 


13 


14 


15 


16 


17 


18 


19 


20 


21 


22 


C 

DE 


C 

DE 


Parameter: 09H in Register: 

Stringadresse: in Register: 

Read Console Buffer 
Liest einen String von Konsole ein. 

Parameter: OAH in Register: 

Pufferadresse: in Register: 

Get Console Status 

Prüft, ob Zeichen von Tastatur eingegeben wurden. 

OBH in Register: C 

00 H für nein 
01H für ja 

Return Version Number 
Gibt die Nummer der verwendeten Version 
Parameter: OCH 

Rückgabe: 


Parameter: 

Ergibt in Register A: 


in Register: C 


C 

DE 


zurück. 

in Register: C 
in Register: HL 
H = 0 = CP/M 80 
Nummer in L BDOS-Versionsnummer 

Reset Disk System 

Die Datenpufferadresse (DMA) bei Laufwerk A wird auf 80H 
gesetzt. 

Parameter: ODH in Register: C 

Select Disk 

setzt aktuelles Laufwerk. 

Parameter: OEH in Register: C 

Laufwerk (A=1,B=2,...) in Register: E 

Gibt in Register A ein Error-Flag und in Register H einen phy¬ 
sikalischen Fehler zurück. 

nen File 
Öffnet eine Datei. 

Parameter: OFH in Register: C 

FCB-Adresse: in Register: DE 

Directory-Code: in Register: A 

Fehler: in Register: H 

Close File 
Schließt eine Datei. 

Parameter: 10H 

Ansonsten wie Funktion 15. 

Search For First 

Sucht den ersten Eintrag einer Datei im Directory. 

Parameter: 11H in Register: 

FCB-Adresse in Register: 

Search For Next 

Sucht nach Ausführung von Funktion 17 den nächsten 
Eintrag. 

Parameter: 12H in Register: C 

Delete File 

Löscht nicht schreibgeschützte Dateien. 

Parameter: 13H in Register: C 

FCB-Adresse in Register: DE/ 

Gibt in H einen Diskettenfehler und in A den Direc- 
tory-Code zurück. 

Read Sequential 

Liest den folgenden Record einer Datei. 

Ergebnis kommt in den Datenpuffer. 

Parameter: 14H in Register: C 

FCB-Adresse in Register: DE 

Gibt in A einen Fehler-Code und in H einen physikalischen 
Fehler zurück. 

Write Sequential 

Beschreibt den folgenden Record aus dem Daten¬ 
puffer. 

Parameter: 15H in Register: C 

FCB-Adresse in Register: DE 

Fehlerrückgabe wie Funktion 20. 

Make File 

Legt ein neues File an. Da noch keine Daten vorhanden sind, 
kommt in die Directory ein Leer¬ 
string. 

Parameter: 16H in Register: C 

FCB-Adresse in Register: DE 
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0128 


23 


24 


25 


26 


27 


28 


29 


30 


31 


32 


33 


34 


35 


36 


37 


38 

39 

40 


41 

42 

43 


C 

DE 


HL 


C 

DE 


Rename File 

Umbenennen von Dateien. Im FCB müssen die ersten 16 
Byte den alten und die restlichen 16 Byte den neuen Namen 
enthalten. 

Parameter: 17H in Register: C 

FCB-Adresse in Register: DE 

Return Login Vector 

Fragt die angeschlossenen Laufwerke ab. Gibt einen 16-Bit- 
Wert in HL zurück, wobei das niederwertige Bit für Laufwerk A 
steht und das höchstwertige für P. 

Parameter: 18H in Register: C 

Rückgabe Login Vector in Register: HL 

Return Current Disk 

Gibt das aktuelle Laufwerk an. Laufwerk A=0, B=1, usw. 
Parameter: 19H in Register: C 

Rückgabe Laufwerk in Register: A 

Set DMA Address 

Datenpufferadresse für Schreib-/Lesezugriffe setzen. 
Parameter: IAH in Register: 

DMA-Adresse in Register: 

Get Addr (Alloc) 

Adresse des Blockbelegungs-Verzeichnisses holen. Wird von 
SHOW zur Ermittlung des freien Speicherplatzes verwendet. 
Parameter: 1BH in Register: C 

Adresse zurück: in Register: 

Write Protect Disk 

Das gewählte Laufwerk erhält einen temporären 
Schreibschutz. 

Parameter: ICH in Register: C 

Get Read-Only Vector 
Ermittelt schreibgeschützte Laufwerke. 

Parameter: 1DH in Register: C 

Set File Attributes 

Aktiviert Dateiattribute, oder setzt diese zurück. Überträgt 
entsprechenden FCB-Eintrag. 

Parameter: 1EH in Register: 

FCB-Adresse in Register: 

Get DPB-Address 

Sucht die Adresse des Disk-Parameter-Blocks. 

Parameter 1FH in Register: C 

Die Adresse wird ins HL-Register gebracht. 

Set/Get User Code G^KP. 

Setzen oder Abfragen der aktuellen Benutzernummer. 
Parameter: 20H in Register: C 

OFFH in Register: E 

In Register A wird die aktuelle Benutzernummer zurückgege¬ 
ben. 

Read Random 

Lesen eines Records im Direktzugriff. 

Parameter: 21H in Register 

FCB-Adresse in Register 
In den Registern A und H werden die Fehlermeldungen 
zurückgegeben. 

Write Random 

Schreiben eines Records im Direktzugriff. 

Parameter: 22H in Register: C 

sonst wie Funktion 33. 

Compute File Size 

Dateigröße in Records ermitteln. Die Größe wird in den Erweite¬ 
rungsbytes für relativen Dateizugriff des FCB abgelegt. 

Parameter: 23H in Register: C 

FCB-Adresse in Register: DE 

Fehler werden in Register A und H zurückgegeben. 

Set Random Record 

Momentane Record-Nummer ermitteln und im FCB ablegen. 
Parameter: 24H in Register: C 

FCB-Adresse in Register: DE 

Reset Drive 

Reset für einzelnes Laufwerk durch Übergabe eines 16-Bit- 
Wertes. Niederwertiges Bit ist Laufwerk A, höchstwertiges Ist 
P. 

Parameter: 25H in Register: C 

Laufwerksvektor in Register: DE 

Nur für MP/M 

Nur für MP/M 

Write Random With Zero 

Wie Funktion 34, jedoch mit vorhergehendem Auffüllen des 
Records mit Nullen. 

Parameter: 28H in Register: C 

FCB-Adresse in Register: DE 

In A und H werden Fehler zurückgegeben. 

Nur für MP/M 
Nur für MP/M 
Nur für MP/M 


or 


c 

DE 


44 


45 


46 


47 


48 


49 


50 


59 
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101 


102 


103 


104 


105 


C 

E 


C 

DE 


C 

DE 


Set Multi-Sector Count 

Während ständiger Schreib-/Lesevorgänge des BDOS können 
maximal 128 Records auf einmal bearbeitet werden. 
Parameter: 2CH in Register: C 

Anzahl der Sektoren in Register: E 

Set BDOS Error Mode 

Physikalische und erweiterte Fehler werden abgefangen. 
Register E=255: Return Error Mode 
Register E=254: Return and Display Mode 
Parameter: 2 DH in Register: C 

BDOS-Fehler-Modus in Register: E 

Get Disk Free Space 

Auf Disketten mit RW-Attribut wird der freie Speicherplatz 
ermittelt. 

Parameter: 2EH in Register: C 

Laufwerksnummer In Register: E 
Die Größe des freien Speichers in Records steht in den 
ersten drei Byte der DMA. 

Chain to Program 

Overlay von Programmen. Die Befehlszeile muß sich im DMA- 
Puffer befinden und mit 00H abgeschlossen sein. Register E 
muß auf FFH gesetzt werden. 

Parameter: 2FH in Register: C 

Overlay-Flag in Register: E 

Flush Buffers 

Die Pufferinhalte werden recordweise auf die Diskette abge¬ 
speichert. 

Parameter: 31H in Register: 

Flag f. Puffer löschen Register: 

Zum Löschen Register E auf FFH setzen. 

Get/Set System Control Block (SCB) 

Lesen und Schreiben des SCB. 

Parameter: 31H in Register: 

Direct Bios Calls 

Aufruf von BIOS-Routinen, die in Bank 0 abgelegt sind. 
Parameter: 32H in Register: 

BlOS-Funktions-Nr. in Register: 

Load Overlay 
Laden von RSX-Moduien. 

Parameter: 3BH in Register 

FCB-Adresse in Register 

In den Registern A und H werden Fehler zurückgegeben. 

Call Resident System Extension 
Aufruf einer RSX-Systemerweiterung. 

Parameter: 3CH in Register: C 

RSX-Funktions-Nr. in Register: DE 

Free Blocks 

Alle Blöcke, die während den BDOS-Aktivitäten vorübergehend 
angelegt wurden, werden gelöscht. Vorsicht: Alle Dateien mit 
Close schließen. 

Parameter: 62H in Register: C 

Fehler werden in den Registern A und H abgelegt. 

Truncate File 

Dem letzten Record einer Datei wird eine wahlfrei Nummer im 
FCB eingetragen. 

Parameter: 63H in Register: 

FCB-Adresse in Register: 

Set Directory Label 

Setzen oder Ändern des Directory-Labels. 

Parameter: 64H in Register: 

FCB-Adresse in Register: 

Return Directory Label Data 
Im Label wird nach dem Byte gesucht, das Informationen über 
Paßwortschutz und Timestamps enthält. Register A wird mit die¬ 
sem Register geladen. 

Parameter: 65H in Register: C 

Laufwerk: in Register: E 

Read File Date Stamps and Paßwort Mode 
Der Paßwort-Modus und Timestamps für Dateien wird ermittelt. 
FCB muß vorher mit dem Dateinamen belegt werden. 
Parameter: 66H in Register: C 

FCB-Adresse in Register: DE 

Write File XFCB 

Schreiben oder aktualisieren eines speziell für geschützte 
Dateien erstellten Directory-Eintrags. 

Parameter: 67H in Register: C 

FCB-Adresse in Register: DE 

Set Date and Time 

Stellen der internen Uhr. Übergabe der Zeit in Register DE im 
BCD-Format. 

Parameter: 68H in Register: C 

Dat-Adresse in Register: DE 

Get Date and Time 
Interne Uhr abfragen. 

Parameter: 69H in Register: C 
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Die Zeit wird im BCD-Format in Register DE übergeben. 

106 Set Default Password 

Vorgabe eines Paßworts, bevor auf eine geschützte Datei zuge¬ 
griffen wird. 

Parameter: 6AH in Register: C 

Paßwort-Adresse in Register: DE 

'107 Return Serial Number 

Feststellen der CP/M-Seriennummer. 

Parameter: 6BH in Register: C 

Die Nummer wird in einem 6-Byte-Feld gespeichert, dessen 
Adresse in Register DE steht. 

108 Get/Set Program Return Code 

Return-Code für Programme ermitteln oder setzen. Neuen Code 
in Rögisterpaar DE übergeben, um den alten Wert auszulesen, 
DE auf FFFFH setzen. 

Parameter: 6CH in Register: C 

109 Get/Set Console Mode 

Konsolen-Modus ermitteln oder neu setzen. Dazu muß ein 
16-Bit-Wert in DE stehen. Bei Abfrage muß DE gleich FFFFH 
sein. Die Informationen finden sich in HL. 

Parameter: 6DH in Register: C 

110 Get/Set Output Delimiter 

Die Ausgabe-Begrenzung für Strings wird gesetzt oder ermit¬ 
telt (Standard=$). Bei Abfrage Register DE auf FFFFH set¬ 
zen. Das Ergebnis befindet sich in Register A. 

Parameter: 6EH in Register: C 

Zum Setzen: Wert in Register: E 

111 Print Block 

Ein im Console-Control-Block definierter String, dessen 
Adresse in DE liegt, wird nach CONOUT gesendet. 

Parameter: 6FH in Register: C 

CCB-Adresse in Register: DE 

112 üst Block 

Hat dieselbe Wirkung wie Funktion 111. 

Es wird lediglich auf LST: ausgegeben. 

152 Parse Filename 

Wandelt einen von der Konsole eingegebenen Dateinamen in 
das interne FCB-Förmat um. DE enthält die Adresse eines Puf¬ 
fers mit folgenden Daten: 

0 und 1 = Adresse des vorgegebenen Strings 
2 und 3 = Adresse des FCB 

Übersicht BDOS-Funktionen (Schluß) 


Diese Auflistung, die alle Funktionen des BDOS enthält, ist 
nicht nur für den Assemblerprogrammierer von Nutzen. Dem 
Anwender hilft sie vor allem beim Analysieren von Systemfeh¬ 
lern. Bei den CP/M-Fehlermeldungen wird immer nur die 
Funktionsnummer ausgegeben, in der der Fehler auftrat. 
Anhand dieser Nummer kann die eigentliche Ursache für den 
Programmabbruch festgestellt werden. Hinter der angege¬ 
benen Funktionsnummer verbirgt sich der Schlüssel zu obi¬ 
ger Auflistung. Dort brauchen Sie nur noch unter der entspre¬ 
chenden Funktionsnummer nachzusehen und schon haben 
Sie die genaue Ursache für den Ausstieg. Wenn sich das 
System beispielsweise mit einem Fehler in Funktion 15 mel¬ 
det, sieht man auf einen Blick, daß eine Datei nicht eröffnet 
werden konnte. Der Programmierer fragt sich zu Recht, wie 
diese Routinen in eigenen Programmen verwendet werden. 
Die angegebenen Register werden mit den erforderlichen 
Daten gefüllt. Die Funktionsnummer wird dabei immer im 
Register C übergeben. Die sonst erforderlichen Daten wer¬ 
den in einem weiteren Register oder Registerpaar gespei¬ 
chert. Danach wird mit »CALL 5« das BDOS aufgerufen. So 
können alle Routinen des BDOS im eigenen Programm ver¬ 
wendet werden. Man spart sich die Zeit zum Schreiben eige¬ 
ner entsprechender Routinen, da man durch die Vielfalt der 
BDOS-Routinen bereits eine große Makrobibliothek zur Ver¬ 
fügung hat. Noch ein Tip für Assemblerprogrammierer, die 
Texte als Konstanten verwenden. In den ersten beiden Byte 
des definierten Puffers werden Informationen zur Stringlänge 
abgelegt. Im ersten Byte findet sich die Definitionslänge, im 
zweiten die wirkliche Länge des Strings. Bei Ausgaben über 
die BDOS-Funktion 9 ist zu beachten, daß am Ende des 
Strings ein Dollar-Zeichen steht, da dieses als Endemarke 

333? 


verwendet wird. Sollen von Konsole eingelesene Strings 
(Funktion 10) wieder ausgegeben werden, müssen diese 
erst mit dem Dollarzeichen am Ende versehen werden. Die 
Informationen über die Länge der Konstanten befinden sich, 
wie bereits erwähnt, in den ersten beiden Bytes. 

Das BIOS - Schichtarbeit im Untergrund 


Auf einer weit niedrigeren Ebene als BDOS arbeitet eine wei¬ 
tere CP/M-System-Komponente: das BIOS. Es ist für die 
Steuerung der Peripherie und der computerinternen Hard¬ 
ware zuständig. Der Zugriff auf die BIOS-Routinen erweist 
sich als weitaus schwieriger als beim BDOS. Zum Glück kön¬ 
nen die meisten benötigten Operationen mit den BDOS- 
Funktionen ausgeführt werden. Schwierig wird es allerdings, 
wennn man zum Beispiel auf einzelne Blöcke und Sektoren 
der Diskette zugreifen will. Dies kann nur unter Verwendung 
der BIOS-Routinen gelöst werden. Nachfolgend eine Liste 
der Funktionen: 


Nr. Funktion 

0 Kaltstart 

1 Warmstart 

2 Konsolenabfrage (A=0: keine Taste, sonst 255) 

3 Zeichen von Konsole nach A 

4 Zeichen von C an Konsole 

5 Zeichen von C an Drucker 

6 Zeichen von C an Hilfskanal 

7 Zeichen von Hilfskanal an A 

8 Schreib-/Lesekopf auf Spur 0 stellen 

9 Laufwerk anwählen (DPH-Adresse in HL) 

10 Spur anwählen (Nummer in BC) 

11 °'-Ktor anwählen (Nummer in BC) 

12 Adresse (in BC) für DMA setzen 

13 Sektor nach anwählen lesen 

14 Sektor nach anwählen schreiben 

15 Druckerstatus abfragen 

16 Sektornummer (in BC) anhand von Skewing-Tabelle 
(Beginn in DE) übersetzen (Ergebnis in HL) 

17 Konsolen-Status prüfen 

18 Eingabe-Status für Hilfskanal prüfen 

19 Ausgabe-Status für Hilfskanal prüfen 

20 Adresse für I/O-Gerätenamen-Tabelle ermitteln 

21 Physikalische Geräte in Tabelle initialisieren 

22 DPH-Adresse für Laufwerk ermitteln (nach HL) 

23 Fortlaufende Sektoren für Read and Write zählen 

24 Löscht physikalischen Sektorpuffer 

25 Blockverschiebung: von Adresse in DE nach 
Adresse in HL, Anzahl der Byte in Registerpaar DC 

26 Zeit setzen/abfragen 

27 Speicherbank (Nummer in A) anwählen 

28 Speicherbank (Nummer in A) für DMA-Operationen 
anwählen 

29 Zielbank (Reg. B) und Quellbank (Reg. C) für Funk¬ 
tion 25, bei Verschiebung zwischen verschiedenen 
Banken 

Übersicht BIOS-Funktionen 


DPH bedeutet Disk-Parameter-Header, eine Tabelle, die 
wichtige Informationen über die Steuerung der Laufwerke 
enthält. DPB steht für Disk-Parameter-Block, dieser stellt die 
nötigen Disketteninformationen zur Verfügung. Beide Tabel¬ 
len liegen in Bank 0, so daß nicht unmitteibar darauf zugegrif¬ 
fen werden kann. 

Um diese BIOS-Funktionen für eigene Programme zu nut¬ 
zen, verwendet man die BDOS-Funktion 50. Allerdings muß 
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vorher eine Tabelle (Bild 4) im Speicher kreiert werden, deren 
Adresse dem BDOS in Register DE übermittelt werden muß. 
Gibt das BIOS Werte zurück, stehen diese nach Ausführung 
in den entsprechenden Registern. Interessant erscheint die 
Möglichkeit, direkt auf die einzelnen Sektoren auf Disk zuzu¬ 
greifen. Dazu bietet BDOS keine Funktion an, so daß auf 
BIOS auszuweichen ist. 

Direkte Systemmanipulation 


Im BDOS existiert eine Tabelle, in der wichtige Informationen 
für alle Systemteile abgelegt sind. Dieses nur 100 Byte lange 
Schlüsselelement nennt sich System-Control-Block (Bild 5). 
Zwar verändern viele BDOS-Aufrufe diese Tabelle, der 
Anwender kann aber über die BDOS-Funktion 49 darauf 
zugreifen. Dabei sollte mit äußerster Vorsicht vorgegangen 


Byte 

Beschreibung 

0 

1 

2 und 3 

4 und 5 

6 und 7 

BIOS-Funktionsnummer 

Inhalt Register A 

Inhalt Registerpaar BC 

Inhalt Registerpaar DE 

Inhalt Registerpaar HL 


Bild 4. Übergabetabelle für BDOS-Funktion 50 


werden, da unsachgemäße Einträge zum Systemabsturz füh¬ 
ren. Dazu wird wieder eine Tabelle zur Verfügung gestellt, die 
in der TPA gespeichert ist. Byte null enthält das angespro¬ 
chene SCB-Element. Byte eins enthält die Anweisung für die 
BDOS-Funktion. Soll ein Byte des SCB gesetzt werden, 
erhält Byte eins den Wert FFH (»H« steht immer für hexadezi¬ 
mal), soll ein Wort gesetzt werden, den Wert FEH, soll ein 
Wert abgefragt werden, erhält Byte eins den Wert 00H. Das 
Ergebnis der Abfrage wird in Byte zwei bei 1-Byte-Werten, 
und in Byte zwei und drei bei 2-Byte-Werten abgelegt. 

Alle, die mit dem Z80- oder 8080/8085-Assembler umzu¬ 
gehen verstehen, haben jetzt die Informationen erhalten, um 
sogar größere Systemmanipulationen vornehmen zu kön¬ 
nen. Der CP/M-Einsteiger kann sein System effektiver und 
mit weniger Fehlern als bisher nutzen. Vor allem ist bewiesen, 
daß CP/M zwar kein Betriebssystem zum Spielen ist, sich 
aber hervorragend für ernsthafte Anwendungen eignet. In 
der 64’er werden wir in Zukunft des öfteren einige CP/M- 
Programme, von denen es Tausende gibt, für Sie testen und 
vorstellen. (rf) 


Nummer 

Beschreibung 

00H - 04H 

Reserviert 

05H 

BDOS-Versions-Nummer 

06H - 09H 

User Flags 

OAH - OFH 

Reserviert 

10H - 11H 

Program Error Return Code 

12H - 19H 

Reserviert 

IAH 

Anzahl der Bildschirmspalten 

1BH 

Aktuelle Bildschirmzeile 

ICH 

Seitenlänge Bildschirm 

1 DH - 21H 

Reserviert 

22H-23H 

CONIN-Flag 

24H - 25H 

CONOUT-Flag 

26H - 27H 

AUXIN-Flag 

28H - 29H 

AUXOUT-Flag 

2AH - 2BH 

LSTOUT-Flag 

2CH 

Page-Modus 

2DH 

Reserviert 

2EH 

Flag für CTRL-H = DEL 

2FH 

Flag für DEL = CTRL-H 

30H - 32H 

Reserviert 

33H - 34H 

Konsolen-Modus (BDOS 109) 

35H - 36H 

Reserviert 

37H 

Ausgabe-Delimiter (BDOS 110) 

38H 

Flag für Druckerausgabe 

39H - 3BH 
3CH - 

Reserviert 

3DH 

Derzeitige DMA-Adresse 

3EH 

Aktuelles Laufwerk 

3FH - 43H 

Reserviert 

44H 

Aktuelle Benutzernummer 

45H - 49H 

Reserviert 

4Ai: 

BDOS-Multi-Sector-Count (BDOS 44) 

4BH 

BDOS-Error-Mode (BDOS 45) 

4CH - 4FH 

Suchpfad für 4 Laufwerke (SETDEF) 

50H 

Laufwerk für temporäre Dateien 

51 H 

Laufwerk, das letzten Fehler meldete 

52H - 56H 

Reserviert 

57H 

Flag für Ausgabeart der BDOS-Meldungen 

58H - 59H 

Tage seit dem 1. Januar 1978 

5AH 

Stunden im BCD-Format 

5BH 

Minuten im BCD-Format 

5CH 

Sekunden im BCD-Format 

5DH - 5EH 

Basisadresse des Common- 
Speicherbereichs 


Bild 5. Die SCB-Block-Beschreibung 
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Druckeranpassung für 
Wordstar 3.0, 
dBase II und Multiplan 


Am Beispiel von Wordstar 3.0 und dem Drucker 
NL-10 von Star wird hier gezeigt, wie einfach man 
die Möglichkeiten eines guten Textverarbeitungs¬ 
systems nutzen und auf die individuellen Bedürf¬ 
nisse anpassen kann. 

D urch die folgende Druckeranpassung an Wordstar 3.0 
sind Sie in der Lage, sowohl die speziellen Fähigkeiten 
Ihres Druckers auszunutzen, als auch die gewonnenen 
Kenntnisse auf die Programme dBase II und Multiplan C128 
zu übertragen, um so in allen drei Programmsystemen Ihren 
Drucker optimal verwenden zu können. 

Druckeranpassung für Wordstar 3.0 


Anpassungsarbeiten nachfolgend beschrieben werden. Sie 
beziehen sich auf den parallel am Userport angeschlossenen 
NL-10, da Wordstar 3.0 nur auf Druckern mit einer 
Centronics-Schnittstelle optimal anzupassen ist. Eine DIN- 
Belegung einer solchen Verbindung zwischen CI28 und 
dem Drucker können Sie Bild 2 entnehmen. 

Anpassung 

Die einzelnen Steuerzeichen für den Drucker sind auf der 
Wordstar-3.0-Systemdiskette in der Datei »WS.COM« vor¬ 
handen. Zusätzliche oder neue Steuerzeichen können in 
diese Datei eingebaut werden. Hierzu benötigen wir das 
ebenfalls auf der Wordstar-3.0-Diskette vorhandene Installa¬ 
tionsprogramm »INSTALL.COM« und die dazugehörigen 
Daten »WS.INS«. 


PIN-Belegung: 


Das Bedienungsfeld des NL-10 (control panel) bietet fantasti- 1 — A^“ - 


sehe Möglichkeiten der Druckbildgestaltung. Wenn man aber 
schon über ein so ausgereiftes Textverarbeitungsprogramm 
wie Wordstar 3.0 verfügt, möchte man natürlich auch alle 
Möglichkeiten des Druckers durch Steuerbefehle nutzen 
können. Wer möchte nicht gerne durch sein Textverarbei¬ 
tungsprogramm den Drucker veranlassen, zum Beispiel 
Schönschrift, Proportionalschrift, Breitschrift, Engschrift, 
Kursivschrift, Doppeldruck, Fettdruck oder gar zwei- oder 
vierfache Schrifthöhe wie von Geisterhand zu wechseln? 

Ein Kopfbogenentwurf wie in Bild 1 dürfte doch sicher 
auch den anspruchsvollen Benutzer begeistern. 

Wordstar bietet zwar einiges; die Möglichkeiten, zusätzli¬ 
che Steuerzeichen an den Drucker zu geben, sind aber doch 
begrenzt. Mit gewissen Tricks und Änderungen über das 
Installationsprogramm läßt sich aber viel erreichen. In einer 
einfach gehaltenen Anleitung sollen diese Änderungen und 


12 - 


B- 

C- 

D- 

E- 

F- 

H- 

J- 

K- 

L- 

M- 

-N 


USERPORT-CENTRONICS 
-GND- 


- FLAG-BUSY - 

-DO- 

-Dl- 

-D2- 

-D3- 

-D4- 

-D5- 

-D6- 

-D7- 

- PA2-STR0BE - 


-16—33^ 
-10 
- 2 

- 3 

- 4 

5 

6 

- 7 
■ 8 
■ 9 
• 1 


19 

I 

30 


Verdrahtungsschema der Centronics-Schnittstelle am Userport 
(Stecker für Userport: TRW 251-12-50-170; für Drucker: 


36poliger Amphenol-Stecker; 
1,5 m) 


Kabel: Flach- oder Rundkabel bis 


Bild 2. PIN-Belegung für ein Userport/Centronics-Kabel 


COMPUTERSERVICE GmbH & Co KG 
Händelsgese11schaft Hamburg 

Al 1 «1 nl Qmr 6«ichlf Ctf Qhrar Dir. AUxandar InCarfica 

Bankverbindung Haspa 200 500 60/Nr. 4050 
Tel. 040/333333 
Postfach 301080 
Druckerstr. 5, 2000 Hamburg 1 
Hamburg , den 


Coaput.ra.rvlc. Hamburg, Pomtfmch 301080, 2000 Hamburg 1 


Bild 1. Entwurf eines Kopfbogens mit Wordstar 3.0 sowie dem Drucker NL-10 
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Um andere Dateien nicht zu schädigen, formatieren wir 
eine neue Diskette und kopieren unter CP/M 3.0 mit dem 
Kopierprogramm »PIP.COM« von den Wordstar-Systemdis- 
ketten die drei Dateien: 

INSTALL.COM (Diskette 2) 

WS.COM (Diskette 1) 

WS.INS (Diskette 2) 

Dies erreichen Sie bei einem Laufwerk durch »e:=a: Pro¬ 
grammname. Kennung«, bei zwei Laufwerken durch »Ziellauf¬ 
werk := Quellaufwerk: Programmname. Kennung«. Legen 
Sie ins Ziellaufwerk die leere (aber formatierte) Diskette und 
in das Quellaufwerk die Wordstar-3.0-Diskette ein. Wenn Sie 
alle Risiken beim Kopieren ausschalten möchten, müssen 
Sie dem zuvor genannten noch »[ov]« anhängen. Die eckigen 
Klammern schließen die sogenannte Option ein, »o« bewirkt 
in jedem Fall ein Kopieren bis zum Ende der Datei (File - Ende 
- Markierungen werden überlesen), »v« führt einen Verify 
durch, das heißt die Daten werden nochmals überprüft. 

Mit der so erstellten Diskette wollen wir jetzt die Neuinstal¬ 
lation durchführen. Wir starten mit dem Befehl: INSTALL 
<RETURN >. 

Es erscheint jetzt auf dem Bildschirm eine Titel- und 
Copyright-Meldung, die mit dem Satz »Type any key to conti- 
nue...« endet. Ein beliebiger Tastendruck führt uns also wei¬ 
ter. Die nächste Bildschirmmeldung zeigt uns, wozu INSTALL 
benötigt wird. Diese Anzeige verlassen wir wieder mit 
< RETURN >. Nun werden wir gefragt, welches Programm 
wir ändern wollen. Wir geben »WS« für Wordstar ein und 
gehen mit < RETURN > weiter. In der nächsten Bildschirm¬ 
anzeige werden wir einige Benutzerhinweise finden, die wir 
aber im Augenblick nicht brauchen, also gehen wir mit einem 
beliebigen Tastendruck weiter. 

Installationsvorarbeiten 


Nun wird die Eingabe des Laufwerkes, in dem sich die Dis¬ 
kette mit der Datei WS.COM befindet, erwartet. Diese 
Anzeige verlassen wir mit < RETURN >, wenn nur das einge¬ 
baute Laufwerk benutzt wird. Verwenden Sie jedoch zwei 
Laufwerke, so geben Sie entsprechend »a:« oder »b:«, gefolgt 
von < RETURN >, ein. 

Nun stellt sich die Frage, wie das zu installierende Pro¬ 
gramm bezeichnet werden soll. Da wir die bereits grundinstal¬ 
lierte Datei WS.COM nur ändern wollen, geben wir hier ein: 
WS.COM < RETURN >. Sie brauchen sich an dieser Stelle 
keine Sorgen zu machen, daß Ihre Installationsdatei über¬ 


* * * INSTALLATIONSMENÜ FÜR DRUCKER * * * 

A Automatische Installation für Spezialdrucker 

B Automatische Installation für Standarddrucker 

Alle Drucker 

Nur Spezialdrucker 

C Name des Druckers 

1 Farbbandauswahl 

D Initialisierung 

J Vertikale Bewegung 


(des Papiers) 

E Überdrucken 

K Horizontale Bewegung 


(des Druckkopfes) 

F Fettdruck 

L Druckmodi 

G Protokollauswahl 

M Phantomzeichen 

H Treiberauswahl 


Nur Standdardrucker 

Optionen 

N Wagenrücklauf/Zeilenvorschub 

0 Benutzereigene Funktionen 

X Zurück zum 

P Papiertransport 

Installationsmenü 

Q Zeichenbreite 

Drücken Sie den Buchstaben Ihrer Wahl (A - Q/X) 


Bild 3. Übersetztes Druckerinstallationsmenü 


schrieben wird, da die Änderungen nur auf der Kopie der Ori¬ 
ginaldiskette durchgeführt werden. Es besteht also jederzeit 
die Möglichkeit, auf die Originaldatei zuzugreifen. 

Wir erhalten jetzt die Meldung, daß die Datei WS.COM zur 
Grundlage genommen wird. Gleichzeitig wird vorgeschla¬ 
gen, die neue Datei wieder WS.COM zu nennen. Diesem Vor¬ 
schlag folgen wir durch Eingabe von < RETURN >. 

Als nächstes werden wir durch die Bildschirmanzeige dar¬ 
auf hingewiesen, daß WS.COM auf der im Laufwerk befindli¬ 
chen Diskette bereits existiert und - wenn wir fortfahren - 
überschrieben wird. Da wir ja eine neue WS.COM-Datei 
erzeugen wollen, sind wir einverstanden und drücken 

< RETURN >. Die folgende Anzeige ist eine Sicherheitsab¬ 
frage, die wir wieder mit < RETURN > bestätigen. Nachdem 
Hinweis, daß WS.COM kopiert wird, erscheint das Haupt¬ 
menü mit den Menüpunkten A - E und X. Da wir eine eigene 
Druckeranpassung vornehmen wollen, wählen wir <D> 
(Custom Ihstallation of Printers). Wir erhalten nun einige 
Erläuterungen zum Druckerinstallationsmenü und verlassen 
es mit einer beliebigen Taste. Jetzt erscheint auf unserem 
Bildschirm das Druckerinstallationsmenü mit den Unterpunk¬ 
ten A - Q und X, das man, gemäß Bild 3 übersetzen kann. 

Für die Verbesserung der Anpassung von Wordstar 3.0 an 
den Star NL-10 benötigen wir nur einige Menüpunkte, da die 
meisten keiner Veränderung bedürfen. Normalerweise kön¬ 
nen nur benutzereigene Funktionen unter dem Punkt <0> 
eingegeben werden. Hier gibt es vier Möglichkeiten: Control 
(jetzt im weiteren Text das Zeichen') PQ, "PW, "PE und "PR. 
Diese vier Möglichkeiten sind zu wenig. Wir suchen daher 
noch nach weiteren und werden beim Menüpunkt <l> fün¬ 
dig. Unser Drucker besitzt nur ein Farbband, eine Umschal¬ 
tungsmöglichkeit wird also nicht benötigt, so daß wir die 
Funktion "PY anderweitig einsetzen können. "PY hat zwei 
Funkn- > len, das erste "PY schaltet einen Vorgang ein, das 
zweite "PY schaltet wieder zurück. 

Die Drucksteuerbefehie “PA und "PN, die wir unter dem 
Menüpunkt <Q> finden, dienen normalerweise der Steue¬ 
rung der Zeichenbreite. Nach meiner Auffassung können wir 
diese Funktion besser nutzen, wir werden hier also eine 
Änderung vornehmen. Unter der Menüziffer <P> finden wir 
noch die Drucksteuerbefehle “PT (Hochstellen) und “PV 
(Tiefstellen). Wir werden diese Befehle für die Druckermög¬ 
lichkeiten Sub- und Superscript nutzen. 

Fangen wir also mit der Neuinstallation bei den Sequenzen 
für Farbbandauswahl an. Nach dem Installationsmenü für 
Drucker wählen wir den Buchstaben < I >. Kurz darauf wer¬ 
den wir gefragt, welche Sequenz beim ersten "PY zum 
Drucker geschickt werden soll. Die nächste Zeile zeigt an, ob 
hier bereits Steuersequenzen installiert sind, wenn ja, wel¬ 
che, oder ob noch gar keine Steuerbefehle vorliegen (empty 
= leer). Im letzten Satz der Bildschirmanzeige werden wir 
angewiesen, bei beabsichtigten Änderungn die Taste <C> 
zu drücken. Wenn wir keine Änderungen wünschen, wäre mit 

< RETURN > weiterzugehen. 

Da wir für das erste PY eine neue Sequenz wollen, müssen 
wir also < C > drücken. Es erscheint ein Bildschirm voller 
englischer Anweisungen, die wir aber bis auf den letzten Satz 
nicht weiter beachten brauchen. Der letzte Satz sagt uns, 
wieviel Eingaben möglich sind. Im vorliegenden Falle wird 
eine »4« angezeigt. Ganz unten sehen wir nebeneinander 
zwei Anzeigen: 

links: »Current value« = gegenwärtiger Wert 

rechts daneben: »New value« = neuer Wert. 

Mit dem ersten “PY wollen wir von der normalen Schrift¬ 
breite (80 Zeichen je Zeile) auf Engschrift (136 Zeichen je 
Zeile) umschalten. Die Eingabe der Steuersequenzen muß 
bei unserer Installationsversion hexadezimal erfolgen. Alle im 
folgenden benutzten Sequenzen finden wir im »Parallel- 
Steckmodul-Handbuch, Anhang D« zum Star NL-10. Aus dem 
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MicroPro Wordstar release 3.00 - 2.0 serial WS PC 128 M&T 
Copyright (C) 1981 MicroPro International Corporation 

Commodore 128 Personal Computer 
Drucker Star NL-10, Inst. 1.0 
No Communications protocol 
Primary list device 


Bild 4. »Normales« Titelbild beim Laden von Wordstar 3.0 

Druckerhandbuch ergibt sich für Engschrift die Sequenz 1B 
(erster Wert) und OF (zweiter Wert). Da vier Eingabemöglich¬ 
keiten zur Verfügung stehen, setzen wir für die erste Möglich¬ 
keit 00 (jeweils weiter mit < RETURN >), für die zweite eben¬ 
falls 00, für die dritte 1B und für die vierte OF. Nach dem letz¬ 
ten < RETURN > erhalten wir die Meldung, daß die neu ein¬ 
gegebene Steuersequenz jetzt lautet: Oh Oh IBh Fh. Wir 
sehen, daß von unserer Eingabe die erste 0 weggefallen ist, 
hinter jeden Wert wurde automatisch ein h für »hexadezimal« 
gestellt. Für unsere weitere Installation ist das »h« aber ohne 
Bedeutung. Falls wir jetzt feststellen, daß wir uns vertan 
haben, gehen wir mit Tastendruck < N > an den Anfang der 
Installation für das erste "PY zurück. Entspricht die neue 
Sequenz aber unserer Eingabe, beantworten wir die fol¬ 
gende Sicherheitsabfrage mit < RETURN >. Damit ist die 
Eingabe abgeschlossen und das Installationsprogramm fragt 
jetzt, welche Steuersequenz das zweite "PY auslösen soll. 


Definition der Steuersequenzen 


Ein Zurücksetzen der Engschrift zum normalen Zeichenab¬ 
stand wird durch hexadezimal 12 ausgelöst. Wir arbeiten uns 
jetzt wieder genau wie beim ersten "PY durch das Menü und 
geben als Wert 00 00 1B 12 ein. Mit dem nächsten 

< RETURN > ist die Installation des Druckermenüpunktes 

< I > abgeschlossen, auf dem Bildschirm erscheint wieder 
das Installationsmenü für Drucker. Wenden wir uns jetzt den 
Steuerbefehlen "PA und "PN zu, die wir im Druckerinstalla¬ 
tionsmenü unter dem Menüpunkt <Q> finden. Mit diesen 
beiden Wordstar-3.0-Befehlen wollen wir softwaremäßig die 
NLQ-Schrift ein- beziehungsweise ausschalten. Drücken wir 
also die Taste < Q > und verfahren wie beim ersten "PY be¬ 
schrieben. Die Steuersequenz, die wir für »NLQ-Schrift ein« 
auf "PA installieren wollen, lautet 00 1B 78 01, auf "PN instal¬ 
lieren wir »NLQ-Schrift aus« mit 00 1B 78 00. 

Es übt sich und wird sicher immer einfacher. Wir gehen also 
jetzt weiter zu Menüpunkt P, um hier die Befehle "PT und "PV 
mit neuen Steuersequenzen zu belegen. 

Die bisherigen Wordstar-3.0-Befehle "PT und "PV (Hoch- 
und Tiefstellen) funktionieren mit Standard-Matrixdruckern 
nur, wenn mit doppeltem Zeilenabstand geschrieben wird. 
Das will man normalerweise aber nicht. Bei einfachem Zeilen¬ 
abstand wird der Befehl ignoriert. Da der NL-10 viele Möglich¬ 
keiten hat, lassen wir uns hier etwas einfallen. Wir verwenden 
Superscript und Subscript für Hoch- beziehungsweise Tief¬ 
stellen. Superscript hat als Steuersequenz 00 1B 53 00, 
Subscript hat die Sequenz 00 1B 53 01. 

Nach Drücken des Menüpunktes < P> verfahren wir auch 
hier nach dem uns schon bekannten System. Mit diesen bei¬ 
den neu installierten Sequenzen können wir aber nur Super¬ 
oder Subscript einschalten. Das genügt uns aber nicht, wir 
müssen danach ja wieder ausschalten können. Das tun wir 
mit dem Befehl "PET Dieser Befehl wird weiter unten noch 
erläutert werden. Wenn wir zum Beispiel die Angabe »m 2 « 
schreiben wollen, so müssen wir folgende Zeichen einge¬ 


ben: m"PT2'PET. Ähnlich wäre bei Tiefstellen mit Subscript 
zu verfahren. Beim Ausdruck unter NLQ werden die hoch¬ 
beziehungsweise tiefgestellten Zeichen allerdings in Normal¬ 
schrift gedruckt. 

Nun kommen wir zu den eigentlichen »Benutzereigenen 
Funktionen«, die wir unter dem Menüpunkt <0> installieren 
können. Hier gibt es vier Befehle, die auch in der nachstehen¬ 
den Reihenfolge zu installieren sind: "PQ, "PW, "PE und "PR. 
Welche zusätzlichen Funktionen unseres Druckers möchten 
wir hier verwenden? Vorschlag: Sequenzen für doppelte und 
vierfache Schrifthöhe (speziell auf dem NL-10), für die mit der 
Funktion »Wiederausschalten« schon drei Befehle benötigt 
werden und schließlich eine »Universalsequenz«, auf die wei¬ 
ter unten noch näher eingegangen wird. 

Die Steuersequenzen für den Installationsdurchgang 

< O > (Benutzereigene Funktionen), deren Installation nach¬ 

einander automatisch auf dem Bildschirm in der folgenden 
Reihenfolge aufgerufen wird, lauten: 
für "PQ 00 1B 68 1 Doppelte Schrifthöhe 

für "PWOO 1B 68 2 Vierfache Schrifthöhe 

für "PE 00 00 00 1B »Universalsequenz« 

für "PR 00 1B 68 0 von 2- beziehungsweise 

4-facher Schrifthöhe zurück 
auf Normalschrift 

Wir beenden die Installation dieses Menüpunktes wie 
unter "PY beschrieben und »landen« wieder im Drucker¬ 
menü. Die Installation könnte jetzt abgeschlossen werden, 
unser »Kind« sollte aber einen Namen bekommen. Beim 
Laden von Wordstar erscheint auf dem Bildschirm kurzfristig 
ein Eröffnungsbild, das für den Drucker normalerweise die 
Bezeichnung »Standarddrucker« enthält. Unter dem Menü¬ 
punkt <C> (Name des Druckers) kann für die Neuinstalla¬ 
tion ein Name eventuell mit einer Installationsnummer wie 
zum Bcicoiel »Drucker Star NL-10, Inst. 1.0« eingegeben wer¬ 
den. Weitere zusätzliche Installationen können dann später 
mit 1.1,1.2 und so weiter bezeichnet werden. Mit <C> rufen 
wir also den Installationspunkt »Name des Druckers« auf. Da 
wir eine Änderung wünschen, betätigen wir nochmals < C >. 
Jetzt können wir einen neuen Druckernamen eingeben. Die 
maximale Zeichenzahl für den Namen darf 34 Zeichen betra¬ 
gen. Damit der neue Name später im Eröffnungsbild zentriert 
erscheint, zählt man die Zeichenzahl des neuen Namens ab. 
Bei dem obigen Vorschlag ergeben sich 29 Zeichen inklusive 
der Leertasten, so daß wir vor dem Namen zwei Leerschritte 
eingeben. Nach abgeschlossener Eingabe und zweimaligem 

< RETURN > ist auch der neue Name installiert. 

Damit wollen wir die Gesamtinstallation beenden. Mit 
Tastendruck <X> verlassen wir das Installationsmenü für 
Drucker, mit einem weiteren <X> verlassen wir auch das 
Hauptmenü. Aus dem jetzt erscheinenden Menü wählen wir 
<A>. Damit wird der gesamte Installationsvorgang abge¬ 
schlossen, die neue Datei WS.COM mit allen Änderungen 
wird gespeichert, schließlich kehrt der CI28 zum CP/M- 
Prompt >A zurück. 

Mit PIP kopieren wir die neu installierte Datei WS.COM auf 
die Wordstar-3.0-Arbeitsdiskette, wobei die alte Datei 
WS.COM überschrieben wird. (Achtung: Keinesfalls auf die 
Original-Wordstar-Diskette kopieren!) 

Wenn jetzt Wordstar geladen wird, sollte ein Eröffnungsbild 
wie in Bild 4 erscheinen, jedoch mit Ihrem zuvor festgelegten 
Druckernamen und gegebenenfalls einer Versionsnummer. 

Es zeigt uns, daß wir jetzt mit der neuen Version WS.COM 
arbeiten und die neuen Befehle der Tabelle 1 anwenden 
können. 

Die »Universalsequenz« 

Unter "PE haben wir die Steuersequenz 00 00 00 1B 
installiert. 1B ist die hexadezimale Darstellung der sogenann¬ 
ten Escapesequenz <ESC> (in Basic C.HR$ (27)). Mit ihr 
beginnen eine ganze Reihe von Steuercodes, mit denen wir 
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unseren NL-10 unter Wordstar veranlassen können, viele 
Dinge zu tun, die uns sonst mit diesem Textprogramm und 
einem Matrixdrucker nicht möglich wären. Zum Beispiel kann 
man mit Wordstar 3.0 und einem Standarddrucker normaler¬ 
weise nur ein-, zweizeilig bis neunzeilig drucken ("OS 1-9). 
Punktbefehle wie zum Beispiel .LH funktionieren nur mit 
Typenraddruckern. Mit unserer »Universalsequenz« aller¬ 
dings eröffnet sich fast eine Wunderwelt an neuen Möglich¬ 
keiten. Zum Beispiel gibt es einen Steuercode, der den Zeilen¬ 
abstand des NL-10 in 7 2 i 6 -inch-Schritten bewirkt. Der Code 
lautet nach dem Handbuch CHR$ (27); "3"; n. Der Stan¬ 
dardzeilenabstand unter Wordstar 3.0 beträgt bei einzeiliger 
Schreibweise 6 Zeilen / inch, 36 / 212 inch wäre also einzeilig. 
1 '/ 2 zeilige Schreibweise läßt sich hieraus rechnerisch un¬ 
schwer ableiten: (1-zeilig = 36, '/ 2 -zeilig = 18, 1 ’/ 2 -zeilig = 
36 + 18 = 54). Nochmals zurück zu unserem Code 
<ESC> "3" n. Für n muß man einsetzen, wieviele 216zehn- 
tel inch der Zeilenabstand betragen soll. Normalerweise 
müßte der Code für 1’/ 2 -zeilige Schreibweise lauten: 

< ESC > " 3" 54. Da in diesen Steuercodes allerdings keine 
Dezimalzahlen, sondern nur ASCII-Codes stehen dürfen 
("3" ist bereits das ASCII-Zeichen der Dezimalzahl 51), müs¬ 
sen wir noch das ASCII-Zeichen für die Dezimalzahl 54 
suchen. Wir finden es in der Liste »ASCII-Codes und Ver¬ 
gleichsliste, Anhang B« des Steckmodul-Handbuches zum 
NL-10 oder jeder anderen ASCII-Vergleichsliste wie folgt: 
dezimal 54 = ASCII "6". Der richtige Code lautet also 

< ESC >;" 3";" 6". Unter Wordstar geben wir "PE36 ein, da 
der Befehl für < ESC > von uns auf "PE installiert wurde. Auf 
unserem Bildschirm erscheint ~E36. Bis zu einer weiteren 
Änderung wird unser Drucker jetzt 1’/ 2 -zeilig drucken. So 


Bezeichnung 

Eingabe 

Bildschirm¬ 

darstellung 

Schönschreibschrift (NLQ) ein 

‘PA 

!A 

Schönschreibschrift (NLQ) aus 

‘PN 

IN 

Superscript <hochgestellt> ein 

•PT 

IT 

Subscript <tiefgestellt> ein 

"PV 

IV 

Super-/Subscipt aus 

'PET 

IET 

<siehe auch weiter unten > 



Kleinschrift <17 Zeichen/inch> ein 

(erstes) *PY 

IY 

Kleinschrift <17 Zeichen/inch> aus 

(zweites) ‘PY 

IY 

Doppelte Schrifthöhe 

‘PQ 

IQ 

Vierfache Schrifthöhe 

"PW 

IW 

Doppelte oder vierfache Schrifthöhe aus 



(zurück zur vorherigen Schrifthöhe) 

•PR 

IR 

Universalsequenz (zusammen mit ein oder zwei 



weiteren Steuerzeichen der jetzt folgenden 



weiteren Auflistung) 

■PE 

IE 

Kursivschrift (Italic) ein 

'PE4 

IE4 

Kursivschrift (Italic) aus 

-PE5 

IE5 

Elite (12 Zeichen/inch) ein 

-PEM 

1EM 

Pica (Normal, 10 Zeichen/inch) ein 

‘PEP 

IEP 

Breitdruck ein 

■PEW1 

IEW1 

Breitdruck aus 

■PEW0 

IEW0 

Proportionalschrift ein 

-PEpl 

lEpl 

Proportionalschrift aus 

'PEpO 

lEpO 

Super- bzw, Subscript aus 

•PET 

IET 

Zeilenabstand 



6 Zellen/inch (normal) 

"PE2 

IE2 

8 Zeilen/inch 

"PEO 

IE0 

10 Zeilen/inch 

•PE1 

IE1 

n Zeilen/inch 

"PE3n 

IE3n 

(siehe auch Erklärung im Text) 



Einmaliger Rücktransport des Papiers um 



n / 2 , 6 tel inch . 

'PEjn 

tEjn 

Berechnung zu n siehe Text 



Beispiel: Einmaliger Rücktransport des Papiers 



um 1 Zeile 

-PEjS 

IEj$ 


Tabelle 1. Die durch die Neuinstallation zusätzlich gewonne¬ 
nen Druckbefehle 


läßt sich jede gewünschte Zwischengröße für die Zeilenab¬ 
stände errechnen und verwirklichen. 

Das alles liest sich viel komplizierter, als es in Wirklichkeit 
ist. Ein wenig Probieren und Nachdenken und die neue 
Drucker-Befehlsübersicht (Tabelle 1) machen diesen Vor¬ 
gang völlig einfach. Fast alle Eigenschaften des NL-10, die 
sich nicht mit normalen Wordstar-3.0-Befehlen oder Punkt¬ 
befehlen ansteuern lassen, sind mit unserer neuen »Univer¬ 
salsequenz« aktivierbar. 

Der Einsatz der Neuinstallation 

Der Einsatz kann natürlich nicht im vollen Umfang darge¬ 
stellt werden, hier muß der Anwender probieren. Auf einige 
Besonderheiten sollte dennoch hingewiesen werden. 

Wer hätte nicht gern die Möglichkeit, Artikel oder 
Abschnitte von Artikeln mit einem Großbuchstaben zu begin¬ 
nen? (siehe beispielsweise die Artikel in der »64’er«), Hierzu 
muß man ein wenig nachdenken. 


Der Einsatz der Neuinstallation 


Normalerweise schreibt der Drucker nach Ausdruck eines 
Buchstabens mit doppelter oder vierfacher Höhe nach 
Zurückschalten auf Normalschrift etwas unterhalb der 
unteren Zeile, also sozusagen am Fuß des Großbuchstabens, 
weiter. Will man in die »Kopfzeile«, ist dies ohne weiteres mit 
der »Universalsequenz« "PE möglich. Probieren Sie doch ein¬ 
fach einmal die folgende Zeichenkette am Beginn der näch¬ 
sten Zeile: 

“PWN"PR"PEjLUN 

Als Ergebnis müßte der NL-10 »Nun« mit großem »N« ausge¬ 
ben. 

Nun i, önnen wir in der Kopfzeile weiterschreiben. Natürlich 
müssen wir jetzt in den folgenden zwei Zeilen am linken Rand 
jeweils vier Leerzeichen einfügen, da wir sonst den Groß¬ 
buchstaben überschreiben. Der Rückschritt in die obere 
Zeile wurde durch die Sequenz "PEjL (Rückschritt um 76 / 216 
inch, also etwas mehr als 2 Zeilen) bewirkt. 

Natürlich muß man bei der späteren Verwendung der dop¬ 
pelten oder vierfachen Schrifthöhe mit Wordstar 3.0 »jonglie¬ 
ren«. Die Buchstaben werden trotz ihrer mehrfachen Breite 
und Höhe in der Statuszeile sowohl bei der Spalten- als auch 
bei der Seitenzahl einfach gezählt. Bei der Wordstar- 
3.0-Standardeinstellung mit 65 Zeichen/Zeile ist also die 
spätere Druckzeile bereits bei 32 doppeltbreiten bezie¬ 
hungsweise 16 vierfachbreiten Zeichen bis an den rechten 
Rand gefüllt. Eine Bildschirmdarstellung ist also, wie auch bei 
fast allen anderen Wordstar-3.0-Befehlen, nicht gegeben. 
Wenn man doppelte oder vierfache Zeichenhöhe über meh¬ 
rere Zeilen schreiben möchte, sollte man nach jeder Schrift¬ 
zeile sofort nach dem letzten Zeichen mit “PR zurücksetzen 
und gegebenenfalls die neue Zeile wieder mit "PQ oder "PW 
beginnen, sonst multipliziert der NL-10 den links gesetzten 
Druckrand mit 2 oder 4 und beginnt dadurch die nächste 
Zeile nicht linksbündig, sondern irgendwo in der Mitte. 

Was den großen Buchstaben recht ist, ist den kleinen billig. 
Mit "PY'PT erhalten wir die kleinstmögliche Schrift auf unse¬ 
rem NL-10, die wir mit “PY“PET beenden. 

Auch die Italic-Breitschrift sieht hervorragend aus. 

Sie wird mit dem Befehl "PEW1 PE4....“PEWO'PE5 
geschrieben. 

Überhaupt ist eine Vielzahl von Kombinationen möglich, die 
man an dieser Stelle bei weitem nicht alle beschreiben kann. 
Probieren Sie doch ein wenig und Sie werden mit mir der Mei¬ 
nung sein, mit der Kombination 
Commodore 128 PC - Star NL-10 - Wordstar 3.0 
über ein vorzügliches und dennoch preiswertes Textverar¬ 
beitungssystem zu verfügen. (Uwe Steenbuck/bj) 
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Turbo-Puscal-Utility 
der Spitzenklasse 


Erstmals stellen wir ein Utility zu Turbo-Pascal vor. 
Der Programmierer kann damit die Verwaltung 
der einzelnen Elemente seiner Programme orga¬ 
nisieren. 

P ascal-Programmierer, die sehr viele Programme schrei¬ 
ben, merken oft gar nicht, daß die eine oder andere Pro¬ 
zedur oder Funktion bereits des öfteren in anderen Pro¬ 
grammen verwendet wurde. Ein großer Vorteil wäre die Kata¬ 
logisierung der bereits verwendeten Programmteile. Doch 
wer macht sich schon die Mühe, jedesmal die einzelnen 
Schritte eines Programms genau zu protokollieren. Die 
Lösung dazu bietet das im folgenden beschriebene Utility 
(Listing 1), das eine Quelldatei wie eine Bibliothek behandelt. 

Nach dem Compilieren des Programms unter Turbo-Pascal 
können Sie es am Quellcode sofort austesten. Dabei haben 
Sie verschiedene Möglichkeiten. Die Ausgabe kann entwe¬ 
der auf den Bildschirm oder auf Diskette gelenkt werden. 
Nehmen wir an, das Programm hat den Namen »LIB.COM«. 
Der Quellcode ist mit der Bezeichnung »LIB.PAS« auf dersel¬ 
ben Diskette abgelegt. Soll die Ausgabe auf den Bildschirm 
erfolgen, geben Sie folgende Befehlszeile ein: 

LIB LIB.PAS 

Alle Funktionen und Prozeduren werden auf dem Bild¬ 
schirm mit Kennbuchstabe (»F« für Funktion und »P« für Pro¬ 
zedur), programminternem Namen und der Bedeutung aus¬ 


gegeben (Bild 1). In der letzten Spalte findet sich der zugehö¬ 
rige Name des Pascal-Programms, aus dem das Element 
stammt. 

Natürlich kann die Tabelle auch auf eine Datei in einem 
beliebigen Laufwerk ausgegeben werden. Zur Veranschauli¬ 
chung soll die Tabelle auf die Datei GESAMT.LIB in Laufwerk 
B ausgegeben werden. Dazu ist folgende Befehlszeile erfor¬ 
derlich: 

LIB LIB.PAS B:GESAMT.LIB 

Für die Eingabe in das Programm sind auch die sogenann¬ 
ten Joker-Zeichen (?, *) erlaubt. Damit können alle Pascal- 
Programme auf einer Diskette nach Funktionen und Prozedu¬ 
ren durchsucht werden. Somit befindet sich nach kurzer Zeit 
eine umfangreiche Bibliothek in einer einzigen Datei und das 
lästige Suchen hat für immer ein Ende. Einige Formalitäten 
müssen allerdings beachtet werden. Der Kopf einer jeden 
Funktion oder Prozedur muß als Kommentar in einem 
bestimmten System aufgebaut werden, damit er als solcher 
von LIB.COM erkannt wird (Bild 2). Dadurch wird zusätzlich 
die Lesbarkeit des Programms verbessert. 

Wer gerne über Hochsprachen ins System vorstoßen 
möchte, findet im Listing einige Kniffe, mit denen das BDOS 
manipnü': rt wird. So wird beispielsweise der Datenpuffer 
(DMA) gesetzt und verändert oder der File-Control-Block 
(FCB) direkt mit Informationen versorgt. 

Zwar wirkt die Länge des Listings abschreckend, doch das 
Abtippen wird sich lohnen. Jeder ernsthafte Programmierer 



TYP! NAME 

! FUNCTION 

! MODUL 


F !read_port 
! 

{ 

t 

1 

!Liest den Zustand eines I/0-Ports ein 
!und ersetzt die vom PASCAL-Compiler 
!falsch uebersetzte Anweisung 
!var:=port[loc]; 

i 

!UTIL.PAS 
; 
j 
i 

i 


F !bcdlto_string 

J 

I 

!wandelt eine in value enthaltene 
!BCD-zahl nach ASCII um 

!UTIL.PAS 
! 


F !set_clock 

1 

I 

!setzt hardware-uhr in der oia 1 

I 

! 

!UTIL.PAS 


P !read_clock 

J 

1 

s 

!Liest Hardware-Uhr der CIAl achtung! 
Iprocedure read_port wird benoetigt! 

1 

!UTIL.PAS 
! 

| 

Bild 1. 

P !cursor_control 

j 

Imanipuliert den Cursor des 80-zeichen 
!Schirmes 

!UTIL.PAS 

1 

Element-Tabelle nach 

i 

! 

i 

Anwendung von LIB.COM 
auf ein 

P !append 
! 

!bewegt den dateizeiger zum ende einer 
Itextdatei danach ist nur noch schreiben 

!UTIL.PAS 

! 

! 

Imoeglich entnommen aus 'Computer 

| 

kleineres Programm 

! 

Ipersoenlich’ 9/86 

1 


{**#**********************#******#***#**********'**♦***********#******* 1 «*******} 


{ ) 

{ FUNCTION : tab (spalte:integer): string[80]; } 

{ } 

{ FUNKTION : simuliert den fehlenden Tabulator-Befehl } 

{ } 

{ EINGABE : spalte: Anzahl der Spalten, um die der Cursor bewegt wird } 

Bild 2. t } 

Für LIB.COM notwendiger f AUSGABE : tab: blank line mit der Laenge der Spalte } 


Kopfaufbau {*****************************************************************************} 
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sollte sich bemühen, seine Quellcodes übersichtlich zu 
gestalten, um einen ständigen Überblick über die verwende- 
teten Funktionen und Prozeduren zu haben. Dieses Spiel 
kann man am Ende soweit treiben, daß ähnliche Programme 


nur noch aus bereits vorhandenen zusammengesetzt und 
leicht modifiziert werden. In diesem Sinne: Weiterhin viel und 
vor allem noch mehr Spaß mit Turbo-Pascal. 

(Woifgang Schröder/rf) 


{ 

{ PROGRAMM 

( 

{ AUTOR 

{ 

{ ERSTELLT AM 

{ 

( LETZTE KORREKTUR 

{ 

( COMPILER 

{ 

( HARDWARE 

{ 

( FUNKTION 

{ 

( 


11b.pas 

woifgang aohroodor 
20.07.08 

turbo paacal 3.0 

commodore ol 28 oder anderer cp/m-reohnor 

erstellt eine uebornlcht dor ln pascol-aourcon 
enthaltenen functiona und procedurea 


{• 


(Su*) 

type 

fcb_typo s record 

drlve : byte; 

fname : nrroy[ 0 .. 10 ] of char; 
extond: byte; 
end; 

fllo_atrlng = atring(14]; 

dme_typo = arrayfO..127] of char; 

Uno = atrlng[132]; 

conat 

aufruf = 'Aufruf: lib inflle [outfile]'; 
blanks = ' 

under_llno = '----- 


var 


infilo, outfile: flle_atring; 
workfile: array[1..32J of file.string; 
in_var, out_var: toxt; 
out_info: boolean; 
answer 4 - char; 

fcb : fcb_type absolute $5c; 

dma : dma_type; 

**ork_lnd. index, reault : integer; 
in_line,out_line: line; 
drive: string[ 2 ); 

{ 

{ FUNCTION : tob (spalte:integer): string[80); 

{ 

{ FUNKTION : simuliert den fehlenden tabulator-befehl 

{ 

{ EINGABE : spalte: anzahl der spalten, um die Cursor gevrcgt • 
{ AUSGABE : tab: blank line mit der laenge spalte 
{»»««««•«•■» ««*»«*»** 


Ulrd ^ -- fNAME_TO_FCB (fnomo: IHo_=trins): boolean; 


««*s«*s*a***x**s****«ss*«x**asas*s*******a***s« 


function tab(spalte:integer): line; 
const 

bl_line = • 
var 

print: string[80]; 
begin 

if apalte>length(bl_line) then 
tab:= 
elae 

tab:= copy(bl_line, 1 .spalte); 
end; (tab) 


FUNCTION : open.output (outfile:atring[14]): boolean; 

FUNKTION : oeffnet auagabedatel fuor textauagabe 

iE : outfile: name der auagabedatel 

append : true -> auagabe an boatehendo datol anfuogen 
falae -> auagabe auf neue datel 

AUSGABE : truo -> auagabodatol goooffnet 

falao -> auagabedatel nioht goooffnet 


function OPEN_OUTPUT(outfile:f1lo.string): boolean: 
bogln 

open_outpUt:e false; 
aaaign (out.var,outfilo); 

($1-) roset (out.var) (9i*); 
if IOreault = 0 thon bogln 
olose (out„var); 
gotoxy(3,6); 

write ('Auagabodatol existiert boroite! Uoborochroibon tJ/nJ 7 ’); 
readln (answor); 
if answer = 'J 1 thon bogln 
erase (out_var); 
rewrlto {out_var); 
open_output:= true; 
end; 

end 

elae begin 

rewrite (out_var); 
open„output:= true; 
end; 

end; {open_output) 

{■•******•«■***»***•*«»****«**«***»*«*•*»****«•*»*»****«*****»*»*«*»*****#•) 


( 

{ FUNCTION 
( - 

{ FUNKTION 

( 

( 

( 

{ EINGABE 

( 

{ AUSGABE 

< 

{ 

( 


fname_to_fcb (fname: string[14]): boolean 

kopiert den angegebenen filename unter boruecksichtlgung 
der feb-ayntax in den standart fcb bei 95c. der filename 
darf auch die jokerzelchen '?' und enthalten. 

fname : in den fcb au kopierenden filenamen 

true -> filename ok 

fcb enthaelt konvertierten filenamen 
false -> syntaxfehler im filenamen 


> 
> 
> 
> 
) 
) 
) 
> 
} 
) 
} 
} 
) 

****«} 


ind_start,indexl, index 2 : integer; 
begin 

fnamo_to_fcb:= true; 

indox 2 := 0 ; 

if fname( 2 ]=*:* then begin 

fcb,drive:= ord(fname[ 1 ])-64; 

ind_start:= 3; 

end 

eise begin 

fcb.drive:= 0 ; 

ind_atart;= 1 ; 
end; 


( } 

{ FUNCTION : check_input (var filel.file2:atring[14]): boolean ) 

{ ) 

( FUNKTION : Holt eventl. vorhandeno beim Programmaufruf angegebene ) 

{ Parameter und max. 2 Filenamen ab } 

( ) 

( EINGABE : keine, da Paramotervoraorgung uobor ParamCount und ParamStr } 

( ) 

< AUSGABE : falae -> falacho Parametoroingabe } 

{ true -> Parametereingabe ok ) 

( infilo: atring(14] -> 1. filename ) 

{ outfile:atrlngl14] -> 2. filename ) 

t ) 


function CHECK_INPUT (vor filel.file2:filo_atring): boolean; 
begin 

chock_input:= false; 
filel:= 
file2:= •*; 

cose ParamCount of 
1 : begin 

f Hol: = PnramStr(l); 
check.input:= truo 
end; 

2 : begin 

filel:= ParamStr(l); 
file2:= ParamStr(2); 
chook_input:= true; 
end; 

elae writeln (aufruf); 
end; (caae) 

end; {chock_lnput} 


Listing 1. Der Quellcode zu LIB.PAS 


for indexl:= ind_atnrt to length(fname) do begin 
case fname[indexl] of 
■A’..'Z', 

’ 0 ‘’ 0 ': begin 

fcb. fname[index 2 J:= fname[indexl]; 

indexl;: = aucc( index 2 ); 

end; 

’.'! begin 

if indox 2<8 thon 

for indoxZ:= indox2 to 8 do 
fcb.fname[index 2 ]:a • 

end; 

’T'J begin 

fob.fname(Index 2 ]:s *?,'; 

IndexZ:= aucc(indox 2 ); 

end; 

begin 

if lndox 2<8 thon 

for index 2 :s lndex 2 to 8 do 
fcb.fnome[index2]:s ‘V 

elae 

for index2:* index2 to 10 do 
fob.fnamo[index2J:s '7’; 

end; 

elae bogln 

writeln ('falscher dotoinamon fuor inputfilo'); 

fna»e_to_fcb:= false; 

and; 

ond; (caae) 
fcb.extond :b 0; 
ond; 

end; (fcb_to_fname) 


( PROCEDURE: dma_to_fnamo (vnr filename:atrlngl14]; 

( 

( 

( FUNKTION 

( 

( 

{ EINGABE 

I 

{ * 

{ AUSGABE 

( 


arroy[0..127] of char; 
dma_poa: integer); 

: setzt einon diroctory eintrag im 'dma' in einen fuor 
datelsugrlffo gueltigen filenarao um 

: dma : von einer bdoo-funktion ausgofuellter dma-bereich 
draa_poa: Startposition im dma fuor den fileointrag 

: filenamo: konvertiert fileointrag fuor dateirugriffo 
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proceduro DMA_TO_FNAME (var filename: file_string; 

dma: dma_type; 
dmo_poa: integer); 

var 

Start: integer; 
begin 

filenarao:= copy (dma,dma_pos+2,8) 

Start: = poa (' filename); 
if Btart>0 then 

delete (filename,atart,5); 

fllename:= eoncat (filename..copy (dma,d»a_po3»10,3) ); {oxt. dasu) 
end; (draa_to_fnamo) 


(dateiname holen) 
(blanka entfernon) 


{ 

{ FUNCTION 

{ 

< 

{ FUNKTION 

< 

{ 

{ EINGABE 

( 

< AUSGABE 

{ 

( 

{ 


: aearah.hoader (var in_file: text; 

var in.lino: Btringll32)): boolean; 

: durchsuaht die angegebene textdatel nach functions- und 
proceduro-hoadorn 

: in.file: datoibeschrelbung der oingabodatoi 

: true -> header gefunden 

ln.lino: seile mit headerbeginn 
falae -> keinen hoador gefunden 


function SEARCH_HEADKR (var in.file: text; 

var ln_line:line): boolean; 

bogin 

aenrch_hoador:= falae; 
whllo not oof(in_flle) do begin 
roadln (in_filo,ln_line); 
if (( pob( '{ FUNCTION : 1 ,in_line)=l) or 

(poa(* ( PROCEDURE:*,ln.llne)=1)) then bogin 

aearch_header:= true; 

exit; 

end; 

end; {while} 


end; {aearch_header} 


in_line:string[132]; workfilo:string[14]); 


oxtrahiert auagaboinfor 
oder procedura 


lation ueber die ueborgobene function 


**«•*««»*•**#****«**»»»*•««*«***»***«*««***»«***•*••«*•) 

) 
) 
) 
) 
) 
) 
) 
) 
} 
) 
} 
> 
} 
) 
) 


<**•*’ 

{ PROCEDURE: extract.info (vor in_filo.out_file:text; out_info:booloan; 

C * . 

< 

{ FUNKTION 
( 

{ 

{ EINGABE 

{ 

{ 

{ 

{ 

( 

{ AUSGABE 

{ 

{■**«****»**«***********! 

procedure EXTRACT_INFO (var in_file,out_file:text; out_info:boolean; 

vor in_llno: line;workfile:file_atring)r 

type 

func_type = array[0..9] of atring[80); 

var 

out_line: atring[80]; 
func_proc: char; 
fp_nome: string(20); 
func_desc: func_type; 

Index*- integer; 
loop, blank_pos:integer; 


: in^flle : dateibeschreibung der oingabodatoi 
out_file: dateiboBchroibung dor auogabodatei 
out_info: ausgabe auf datei(truo) oder blldachirra(falae); 
in_lino : seile mit function- baw. procedurenamen 
workfile: norae der eingabedatei 

: extrahierte Information 


miiuiun 


"(STeR 1 c nu 


**»*«#*»*w»**«».«»»*i***»«»***M»;»*»**»***«»**»***«««*«****#*«*********») 


split (var in_llne: fune_type; max_lino:integer; 

var index: integer; max_length: integer): line 

reformatiert eine textseile auf eine andere laenge 

in_llne * arrayf] of stringO 

original text (wird veraendert!) 
max_line - ansahl der au reformatlerende seilen ln in.llne 
max_longth = soilenlaonge doa neuen textea 

split = stringf] reformatierto seile 

index = sellennununor der suletst reformotierton seile 


(»: 

( 

{ FUNCTION 

( 

( 

{ FUNKTION 

( 

{ EINGABE 

< 

{ 

{ 

( 

{ AUSGABE 

< 

{ 

function aplit(var in_lino: func.typo; max.line:intoger; 

vor index:integer; max.length:intoger): line; 

vor tompl.temp2: atring(80); 
bl_poB:intogor; 


tomp2:*’ 1 ; 
ropeat 

bl_poB:s pob( ' * ,in_line[Index]); 
if bl_pos=0 then 

templ:= ln_llne[Index]*' ' 
elae 

tompl:= copy(in_line[Index],1,bl_poa); 
if longth(tompl♦temp2)>max_length then begin 
split:=terop2; 
oxit 

end 

eise begin 

temp2 :- tomp2♦templ; 

doloto (ln_line[Index],1,bl_pos); 

if bl_poa=0 then 

Index:= succ(index); 

end; 

untll (index>max_line); 
split:= temp2; 
end; (split) 

begin ( of oxtract_lnfo) 

if pos{'( FUNCTION :'.in_line)=1 then 
func_proc:= ’F' 
eise 

func_proc:= ’P'; 


Index:= pos(’(•,in_line); 
if ((index=0) or (index>34)) then 
fp_namo:= copy(in_line,14,20) 
elae 

fp_name:= copy(in_line.14.index-14); 
repeat 

roadln (in_file,in_line); 
until (poa(' {< FUNKTION : * , in_line) = l); 


(kommontoraoichen entfernen) 


delete (in.line,1.12); 

Index:= -X; 

repeat 

delete (in.lino,1.1); 

while ln_llne[l]s' • do (blanka am seilenbeginn ontfernon) 
delete (in_line.1.1); 

if in_line<>')' then begin 

delete (in_line,length(in.line).1); 
while in_line(length(in_llno)]=' * do 
delete (in_llno,length(in.llne).1); 

Index:* aucc(indox); 
func_deao[Index]:* in.line; 

roadln (in_file,in_llne); 
end; 

until ((in_line=’)•) or (index=9)); 

loop:= 0; 

ropeat 

out_llno:=' '♦func_proc*' !•♦fp_name; 
out_line:= copy(out_llno*blonka.1.23); 

out. _1 ine:= out_line*'!'♦spllt(func_desc,Index,loop,40); 
out.line:= copy(out_lino+blank8.1,66); 
out_line:= out_line**!’♦workfile; 
if out_info thon 

writeln (out_vnr,out_line) 
eise 

writeln (out.line); 
fp_nome:= ’'; 
func_proc:= ' 
workf ilo: = 
until (loopMndex); 

ond; (extroat_info) 

(** hauptprograram **) 

{»»•**•«**■•«***•*«•■•} 

begin 

clrscr; 

if CHECK_INPUT(infile.outfile) thon begin 
if length(outfile) <> 0 then begin 
gotoxy (3.3); 

Write (’Ausgabodatci: ’.outfilo); 
if not(0PEN_0UTPUT(outfile)) thon 
oxit 
eise 

out_info:= true; 
gotoxy (3,9); 

write ('Datei: outfile,’ wird geschrieben’); 


end 


ö-w_info:= falso; 
if infile[2] = thon 

drive:= copy (infile.1,2) 
elae 

drive:* 

if FNAME_TO_FCB(infile) then begin 
work_ind:= 1; 

bdos (26.addr(dma)); (sot dma address) 
result:= bdos (17.addr(fcb)); (search for first) 
while ((result0255) and (work_ind<33)) do begin 

index:= result shl 5; (startadresse dos directory entry) 
DMA_TO_FNAME(workfile[work.ind].dma,index); 

workfile[work_ind]:= drive*workfile[work_ind]; (laufwerk daau) 
work_ind:= succ(work_ind); 

result:= bdos (18,addr(fcb)); (search for next) 
end; (while) 

if rosult<>255 then begin 

writeln (’es koennen nicht mehr als 32 flies bearbeitet werden!*); 
exit; 
end; 

work_ind:= work_ind-l; 
if work_ind=0 then begin 

writeln (’koin inputfile gefunden!'); 
exit; 
end; 

if out.info thon begin 

writeln (out_var.'TYP! NAME*,tab(14).•! FUNCTION’,tab(32).'I MODUL'); 
writeln (out.var,•---♦•.convfundor I1n« 1.19),’, 
copy (under_ lino, 1.41), •♦———•); 

end 

eise begin 

writeln ('TYP! NAME*.tab(14).'! FUNCTION'.tab(32)8 MODUL'); 
writeln ('—♦',copy(undor_line,1.19),, 
copy(undor_line. 1,41), *♦.'); 

ond; 

for indox:* 1 to work_ind do begin 
aaslgn (ln.var,workfile(index)); 
roaet (in.var); 

while SEARCH_HEADKR (in.var,in.lino) do begin 

EXTRACT_INFO(in_var,out_var,out_lnfo,in_line,workfile[Index)); 
if out_info then 

writoln (out_var,tab(3),* 8 *,tab(19),'I',tab(41),’8') 
eise 

writeln (tab(3),•8 *,tab(19),»!*,tab(41).* 8•); 

ond; 

closo (in.ver); 
ond; 
end; 

if out_info thon 
closo (out_var); 

ond; 

end. 


Listing 1. Der Quellcode zu LIB.PAS (Schluß) 
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C64/C128 


Hinweise 
zum Abtippen 


Sie haben kein Problem mehr mit dem Abtippen 
von Basic-Programmen, wenn Sie die folgenden 
Hinweise zum Abtippen beachten. 

U nsere Basic-Listings enthalten keine Steuerzeichen 
mehr. Diese werden ersetzt durch Klartext und stehen 
zwischen geschweiften Klammern. Deshalb sind 
weder die Klammern noch was dazwischen steht, abzutip- 


S PRINT CHR*(14) <242> 
10 PRINT" tCLRJ" <254> 
20 PRINT"<130> 
30 PRINT"I4DOWN,2SPftCE>3ESTtSPACE,BLUE,6SP 

ACEJ“ <022> 
40 PRINT"SlOTro82SSVSSSSSS8OTSSygTrre ,, <108> 


© G4'er 


Bild 1. So könnte ein Teil eines Listings abgedruckt sein. In Zeile 
10 müssen Sie nach den Anführungsstrichen die 
<CLEAR+HOME>-Taste drücken und nicht die Klammern mit 
dem Wort CLR. In Zeile 20 drücken Sie nach den Anführungsstri¬ 
chen die < CBM > -Taste und den Buchstaben Q, gefolgt von meh¬ 
reren <SHIFT>- und STERN-Tasten und zum Schluß die 
Commodore-Taste und den Buchstaben W. In Zeile 30 ist es vier¬ 
mal die Cursor-nach-unten-Taste, gefolgt von zweimal die Leerta¬ 
ste, dann <SHIFT> und T und normal EST, zum Schluß noch ein¬ 
mal die Leertaste, die Farbtaste Blau (<CONTROL> und 7) und 
sechsmal die Leertaste. Zeile 40 besteht lediglich aus mehreren 
Grafikzeichen, die mit der < CBM >-Taste und <B> erzeugt wer¬ 
den. 


pen, sondern die in Tabelle 1 aufgeführten Tasten zu drücken. 
Auf Ihrem Bildschirm erhalten Sie daiyi wieder die entspre¬ 
chenden Grafikzeichen (siehe Bild 1 und 2). 

Alle Grafikzeichen werden ebenfalls ersetzt durch unter¬ 
strichene oder überstrichene Großbuchstaben. 

Unterstrichene Buchstaben bedeuten, daß Sie die 
<SHIFT>-Taste und den angegebenen Buchstaben 
drücken müssen, überstrichene jedoch die <CBM>-Taste 
mit dem Buchstaben. 

Auch hier erhalten Sie am Bildschirm das entsprechende 
Grafikzeichen und nicht etwa das im Listing erkennbare Zei¬ 
chen (siehe Bild 1 und 2). 

Die Leerzeichen zwischen den einzelnen Basic-Befehlen 
können beim Abtippen entfallen. Dies ist besonders bei spei¬ 
cherkritischen Programmen wichtig. 

Ebenso müssen Zeilen, die mehr als 80 Zeichen pro Zeile 
enthalten, mit den bekannten Abkürzungen für die Basic- 
Befehle (siehe auch das Handbuch zum Computer, im 
Anhang) eingegeben werden. (gk) 


5 PRINTCHR*(14) 

10 ►'.{INT’Tr 

20 PRINT" I-1 ■' 

30 PRINT"5!MKtBl I EST 3 

40 PR I NT " V.V.W.W.V.V.V.ViV.WAV.V." 


Bild 2. Auf dem Bildschirm oder Ihrem Drucker sieht das 
Listing (Bild 1) so aus 


(CTRL] 

steht für Control-Taste, so bedeutet |CTRL-AJ, daß 

[CTRL+J] 

Line Feed 


Sie die Control-Taste und die Taste >A« drücken 

[CTRL] 

Control-Taste 


müssen. Im folgenden steht; 

[BLACK] 

Control-Taste 8 1 

[DOWN] 

Taste neben rechtem Shift, Cursor unten 

[WHITEJ 

Control-Taste 8 2 

[UP] 

Shift-Taste 8 Taste neben rechtem Shift; Cursor 

[RED] 

Control-Taste 8 3 


hoch 

[CYAN] 

Control-Taste 8 4 

[CLR] 

Shift-Taste 8 2. Taste ganz rechts oben 

(PURPLEI 

Control-Taste 8 5 

[INST] 

Shift-Taste 8 Taste ganz rechts oben 

IGREEN] 

Control-Taste 8 6 

[HOME] 

2. Taste von ganz rechts oben 

[BLUE! 

Control-Taste 8 7 

[DEL] 

Taste ganz rechts oben 

[YELLOW] 

Control-Taste 8 8 

[RIGHT] 

Taste ganz rechts unten 

[RVSON] 

Control-Taste 8 9 

[LEFT] 

Shift-Taste 8 Taste unten rechts 

[RVOFF] 

Control-Taste 8 0 

[SPACE] 

Leertaste, Hinweis: [13 SPACE] bedeutet 13mal die 

(ORANGE! 

Commodore-Taste 8 1 


Leertaste drücken 

[BROWN] 

Commodore-Taste 8 2 

ISHFT-SPCEI 

Shift-Taste 8 Leertaste 

[UG.RED] 

Commodore-Taste 8 3 

(Fl) 

grauer Tastenblock rechts 

(GREY 1] 

Commodore-Taste 8 4 

IF3] 

grauer Tastenblock rechts 

[GREY 2] 

Commodore-Taste 8 5 

[FS] 

grauer Tastenblock rechts 

[LIGGREEN] 

Commodore-Taste 8 6 

(F7J 

grauer Tastenblock rechts 

[LIG.BLUE] 

Commodore-Taste 8 7 

[F2] 

grauer Tastenblock rechts 8 Shift 

[GREY 3] 

Commodore-Taste 8 8 

|F4) 

grauer Tastenblock rechts 8 Shift 

Wenn Sie sich erst einmal an die in Klartext geschriebenen Steuer- 

[F6] 

grauer Tastenblock rechts 8 Shift 

Zeichen gewöhnt haben, werden Sie den Vorteil dieser Schreibweise 

(F8) 

grauer Tastenblock rechts 8 Shift 

erkennen. Der zu dem jeweiligen Steuerzeichen gehörende Klartext 

[RETURN! 

Shift-Taste 8 Return 

ist so verfaßt, daß Sie leicht die Taste beziehungsweise die Tasten- 

(CTRL+I] 

TAB-Taste 

kombination finden, die Sie drücken müssen. 


Tabelle 1. Die Steuerbefehle für den C64/C128 im Klartext 
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C64/C128 


EINGABEHILFE 


MSE-Abtippen 
sicher und 
leiditgemadit 

Der MSE ist ein leicht zu bedienendes Hilfsmittel 
bei der Eingabe von Maschinensprache-Program¬ 
men im C64-Modus. 


Geben Sie auf die Frage nach der Startadresse aber jetzt 
<L> ein, um Ihr Teilprogramm zu laden. Jetzt können Sie mit 
<CTRL+N> die Adresse eingeben, an der Sie weitertippen 
müssen. Wenn Sie sich nicht gemerkt haben, wie weit Sie 
gekommen sind, geben Sie nach dem Laden <CTRL+M> 
ein. 

Auf die Frage nach der Startadresse antworten Sie mit der 
Anfangsadresse, die links in der Kopfzeile auf dem Bildschirm 
steht. Nun wird Ihr Programm aufgelistet. Mit < SPACE > wird 
das Listen fortgesetzt, mit <STOP> abgebrochen. Das Ende 
Ihres Programmteils erkennen Sie sehr einfach daran, daß nur 
noch der Wert »AA« in der Zeile steht. Die Adresse dieser Zeile 
müssen Sie anschließend mit <CTRL+N> eingeben. Das 
Programm ist nur mit <RUN/STOP+RESTORE> zu verlas¬ 
sen. Speichern Sie aber vorher unbedingt immer Ihren Text. 


D er MSE verringert die Tipparbeit um ein Drittel und 
schließt Fehleingaben vollkommen aus. Außerdem 
können Sie die Werte blind eingeben, ohne andauernd 
auf den Bildschirm schauen zu müssen. Dies wird durch 
akustische Meldungen realisiert. 

MSE ist ein Maschinensprache-Editor, mit dem ein Vertip¬ 
pen ausgeschlossen ist. Eine abgetippte Zeile wird nur ange¬ 
nommen, wenn sie richtig ist. Eine Checksumme am Ende 
jeder Zeile prüft, ob die richtigen Werte in der richtigen Zeile 
an der richtigen Stelle stehen. Wenn nicht, ertönt ein Warn¬ 
signal, und man beseitigt den Fehler. 

War die Zeile korrekt, erklingt ein Gong, und die nächste 
Zeilennummer wird ausgegeben. Damit ist also auch »blin¬ 
des« Eintippen möglich; Sie können sich voll auf den Text kon¬ 
zentrieren. 


So arbeitet man mit MSE 

Aktivieren Sie den C64-Modus, laden und starten Sie 
MSE. Zuerst werden der Programmname und die Start- und 
Endadresse erfragt. Diese Angaben entnehmen Sie dem 
Kopf des jeweiligen abgedruckten Listings. Der MSE mel¬ 
det sich dann mit der Zeilennummer der ersten Zeile. 

Wenn Sie die Zeile richtig eingegeben haben, erscheint die 
nächste Zeilennummer und so weiter bis zum Ende. Zum 
Schluß wird das fertige Programm mit <CTRL+S> auf Dis¬ 
kette oder Kassette gespeichert. Dazu sind keine weiteren 
Angaben mehr erforderlich. Das Programm kann dann ganz 
normal wieder geladen und gestartet werden. Wenn Sie nicht 
alles auf einmal tippen wollen, können Sie jederzeit unterbre¬ 
chen und den eingetippten Teil mit <CTRL+S> speichern. 
Wollen Sie Weiterarbeiten, laden und starten Sie MSE wieder. 


Hinweise zum Abtippen 

Vor dem Abtippen oder späteren Wiederladen des MSE- 
Laders müssen Sie unbedingt folgende Zeile eingeben: 
POKE 43,1: POKE 44,32: POKE 8192,0: NEW 

Den MSE-Lader brauchen Sie nur einmal. Nach erfolgrei¬ 
chem Abtippen und Starten mit RUN geht der Lader verloren, 
und es wird das endgültige Programm MSE VI.0 erzeugt. So 
gehen Sie vor: 

Starten Sie das Programm mit RUN. Fehlerhafte Zeilen wer¬ 
den angezeigt und müssen korrigiert werden, bis der Lader 
zum »READY« durchläuft. Jetzt müssen Sie das fertige MSE- 
Programm speichern. Dazu brauchen Sie nur < RETURN > 
zu drücken, weil die erforderlichen Angaben schon auf dem 
Bildschirm stehen. (Kassettenbesitzer müssen in Zeile 343 
die letzte Zahl in »1« abändern.) Ab jetzt können Sie »MSE 
VI.0« direkt, also ohne den DATA-Lader, benutzen. MSE V1.0 
wird ganz normal mit »,8« geladen (keine POKEs notwendig). 

(N. Mann/D. Weineck/gk) 


MSE-Befehle: 

<DEL> 

löscht die letzte Eingabe 

<CTRL+S> 

speichert das eingetippte Programm ab. 

<L> oder 

lädt ein Programm. Start- und Endadresse wer- 

<CTRL+L> 

den automatisch ermittelt. 

<CTRL+M> 

listet den Speicherinhalt. Abbruch mit STOP- 

<CTRL+N> 

Taste, weiter mit Leertaste. 

erlaubt die Eingabe einer neuen Adresse zum 

<CTRL+P> 

Weitertippen. 

gibt ein MSE-Listing aut dem Drucker aus. 


uaa 

REM **************************** 

<091> 

KE 198,3 

<"749> 

110 

REM * * 

< 159 > 

343 PRINT"<3D0WN>SAVE"CHRS(34)"MSE V1.0"CH 


120 

REM * MSE LADER * 

<206> 

RS(34)",8 

< 171 > 

130 

REM * * 

< 179> 

344 END 

<092> 

220 

REM **************************** 

<211 > 

1000 DATA 00,0B,08,0A,00,9E,32,30,36,31,00 


230 

REM 

<036> 

,00,00,A2,08,A9,36,85,A4,A9, 1247 

< 119> 

240 

DIM H(75): FOR 1=0 TO 9 

< 113> 

1001 DATA 08,85, A5, A9,00,85, A6 , A9 , B0 ,85 , A7 


250 

HC4B+I)=I: H <65+1)=1 + 10:NEXT 

<041 > 

,A0,00,B1,A4,91,A6,C8,D0,F9, 2888 

<054> 

260 

FOR 1=2048 TO 3755 : READ AS 

< 198> 

1002 DATA E6,A5,E6,A7,CA,D0,F2,A9,36,85,01 


270 

H=ASC(LEFTS(AS,1)):L=ASC <RIGHTS(AS,1>) 

< 199> 

, 4C, 00, B0,20, D1 , B1, A9,06,8D, 2787 

< 144> 

280 

D=H(H)*16+H(L):S=S+D:POKE I,D 

<219> 

1003 DATA 21,D0,A9,03,8D,20,D0,8D,86,02,A0 


290 

A=A+1:IF A<20 THEN NEXT:A=-1 

< 141 > 

, B3 , A9,74,20 , FF , B1, A0 , B3 , A9 , 2667 

<237> 

300 

PRINT " ZEILE:";1000+Z; 

<011> 

1004 DATA B9,20,FF,Bl,A0,00,20,CF,FF,99,01 


310 

READ V :Z=Z+1:IF V=S THEN 330 

<218> 

, 02 , C8 , C9,0D , D0 , F5,88, F0 , D2 , 2912 

<217> 

320 

PRINT"PRUEFSUMMENFEHLER 1":STOP 

< 138> 

1005 DATA C0,0F,90,02,A0,0E,80,00,02,20,EA 


330 

IF A<0 THEN 341 

<221 > 

,Bl,A0,B3,A9,CF,20,FF,B1,20, 2323 

<013> 

340 

S=0:A=0:PRINT:NEXT 

<046> 

1006 DATA 8E,B4,85,FC,85,62,20,8E,B4,85,FB 


341 

PRINT"<CLR>PS43,1:PA44,8:PA45,172:PA46 
,14 

<010> 

,85,61,20,A7,B4,D0,20,A0,B3, 2864 

1007 DATA A9,E5,20,FF,B1,20,8E,B4,85,60,20 

< 199> 

342 

POKE 631,19:POKE 632,13:P0KE 633,13:PD 


,8E,B4,85,5F,20,A7,B4,D0,0A, 2624 

<091 > 

Der MSE zum bequemen Abtippen von Maschinenprogrammen 
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C64JC128 


1008 DATA A5,61,C5,5F,A5,62,E5,60,90,06,20 

,43,B3,4C,3A,B0,A9,AA,A0,00, 2379 <167> 

1009 DATA 91,FB,E6,FB,D0,02,E6,FC,20,3F,B2 

,90,EF,4C,FB,B4,A2,02,86,58, 3118 <152> 

1010 DATA A9,A6,A0,9D,20,F2,B1,20,E4,FF,F0 

,FB,C9,30,90,0C,C9,47,B0,08, 2970 <231> 

1011 DATA C9,3A,90,0B,C9,41,B0,07,C9,14,D0 

,0F,4C,0B,B1,20,D2,FF,A6,58, 2322 <121> 

1012 DATA 95,F7,C6,58,D0,D2,60,AE,8D,02,F0 

,26,C9,0C,D0,03,4C,0B,B6,C9, 2685 <057> 

1013 DATA 13,D0,03,4C,8B,B5,C9,0D,D0,03,4C 

,BA,B4,C9,10,D0,03,4C,6B,B5, 2282 <225> 

1014 DATA C9,0E,D0,06,20,5F,B4,4C,64,Bl,4C 

,92,B0,A5,F9,20,02,B1,0A,0A, 2132 <208> 

1015 DATA 0A,0A,85,F9,A5,F8,20,02,Bl,05,F9 

,60,C9,3A,90,02,69,08,29,0F, 1950 <092> 

1016 DATA 60,A6,59,E0,08,90,1F,A6,58,E0,02 

,B0,06,20,D2,FF,40,8E,B0,C6, 2509 <18B> 

1017 DATA 59,A0,14,A9,92,20,F2,B1,CA,D0,FA 

,84,57,68,68,4C,8B,B1,A6,D3, 2891 <197> 

1018 DATA E0,08,B0,03,4C,92,B0,20,D2,FF,A6 

,58,E0,02,90,09,C6,59,20,D2, 2468 <049> 

1019 DATA FF,C6,58,D0,F9,4C,8E,B0,48,4A,4A 

,4A,4A,20,59,B1,68,29,0F,C9, 2419 <035> 

1020 DATA 0A,90,02,69,06,69,30,4C,D2,FF,A2 

,FC,9A,20,Dl,Bl,20,48,B2,20, 2261 <073> 

1021 DATA EA,B1,20,9F,B2,A5,FC,20,4E,B1 ,A5 

,FB,20,4E,B1,20,ED,B1,A9,3A, 2860 <148> 

1022 DATA A0,20,20,F2,B1,A9,00,85,59,20,8E 

,B0,20,ED,B1,A4,59,20,EF,B0, 2530 <233> 

1023 DATA 91,FB,C8,84,59,00,08,90,EC,20,10 

,B2,A9,12,20,D2,FF,20,8E,B0, 2657 <105> 

1024 DATA 20,EF,B0,05,FF,F0,0D,20,43,B3,A9 

,14,A0,14,20,F2,B1,40,A2,B1, 2665 <034> 

1025 DATA A9,92,20,D2,FF,20,33,B2,20,E0,B2 

,20,3F,B2,90,9F,40,BB,B5,A9, 2648 <123> 

1026 DATA 93,20,D2,FF,A2,00,A9,03,9D,00,DB 

,9D,00,D9,9D,00,DA,9D,00,DB, 2476 <237> 

1027 DATA E8, D0, EF , 60, A9,0D, 20 , A9,20,40 , D2 

,FF,20,D2,FF,98,40,D2,FF,20, 2965 <160> 

1028 DATA E4 , FF , F0, FB , 60,84,5D , 85,50 , A0,00 

,Bl,5C,F0,06,20,D2,FF,C8,D0, 3100 <077* 

1029 DATA F6,60,A5,FB,85,5A,A0,00,84,5B,B1 

,FB,18,65,5A,85,5A,90,02,E6, 2606 <156> 

1030 DATA 5B , 06,5A , 26,5B , 08,00,08,90 , EC , A5 

,5A,65,5B,85,FF,60,18,A5,FB, 2467 <219> 

1031 DATA 69,08,85,FB,90,02,E6,FC,60,A5,FB 

,05,5F,A5,F0,E5,60,60,A0,B3, 3106 <183> 

1032 DATA A9,FB,20,FF,B1,A0,01,B9,00,02,20 

,D2,FF,00,00,02,08,90,F4,A9, 2692 <098> 

1033 DATA 10,ED,00,02,AA,20,ED,Bl,CA,D0,FA 

,A5,62,20,4E,B1,A5,61,20,4E, 2453 <236> 

1034 DATA Bl,20,ED,Bl,A5,60,20,4E,Bl,A5,5F 

,20,4E,B1,A9,9F,20,D2,FF,20, 2575 <03B> 

1035 DATA EA,B1,24,5E,10,01,60,A9,12,20,D2 

,FF,A2,28,20,ED,Bl,CA,D0,FA, 2646 <161> 

1036 DATA A9,92,4C,D2,FF,A5,D6,09, 16,B0,01 

,60,A9,A0,85,A4,A9,78,85,A6, 2945 <204> 

1037 DATA A9,04,85,A5,85,A7,A2,13,A0,27,B1 

,A4,91,A6,88,10,F9,CA,F0,19, 2671 <208> 

1038 DATA 18,A5,A4,69,28,85,A4,90,02,E6,A5 

,1B,A5,A6,69,28,B5,A6,90,E0, 2503 <251> 

1039 DATA E6,A7,40,B6,B2,A9,91,40,D2,FF,A9 

,0F,8D,18,D4,A9,00,BD,05,D4, 2776 <000> 

1040 DATA A9,F7,8D,06,D4,A9,11,8D,04,D4,A9 

,32,8D,01,D4,A9,00,80,00,D4, 2413 <126> 

1041 DATA A0,80,20,09,B3,A9,10,8D,04,D4,60 

,A2,FF,CA,D0,FD,88,D0,F8,60, 2914 <240> 

1042 DATA A9,0F,8D,18,D4,A9,2D,8D,05,D4,A9 

,A5,8D,06,D4,A9,21,8D,04,D4, 2385 <119> 

1043 DATA A9,07,8D,01,D4,A9,05,8D,00,D4,A0 

,FF,20,09,B3,A9,20,8D,04,D4, 2250 <07B> 

1044 DATA A9,00,BD,01,D4,8D,00,D4,60,38,20 

,F0,FF,8A,48,98,48,18,A0,06, 2179 <175> 

1045 DATA A2,18,20,F0,FF,A0,B4,A9,0A,20,FF 

,Bl,20,12,B3,20,E4,FF,F0,FB, 2931 <093> 

1046 DATA A2,ID,A9,14,20,D2,FF,CA,D0,FA,68 

,A8,6B,AA,18,40,F0,FF,0D,0D, 2704 <088> 

1047 DATA 0D,20,20,20,20,20,20,20,4D,41,53 

,43,48,49,4E,45,4E,53,50,52, 1144 <216> 

1048 DATA 41,43,48,45,20,2D,20,45,44,49,54 

,4F,52,20,0D,0D,20,20,20,20, 1023 <038> 


1049 DATA 20,20,20,20,56,4F , 4E, 20,4E , 2E, 4D 

,41,4E,4E,20,26,20,44,2E,57, 1128 <206> 

1050 DATA 45,49,4E , 45,43,4B, 00,0D, 0D , 0D, 20 

,20,20,50,52,4F,47,52,41,4D, 1102 <117> 

1051 DATA 4D,4E,41,4D,45,20,3A,20,00,0D,0D 

,20,20,20,53,54,41,52,54,41, 1073 <095> 

1052 DATA 44,52,45,53,53,45,20,3A,20,24,00 

,0D,0D,20,20,20,45,4E,44,41, 1014 <129> 

1053 DATA 44,52,45,53,53,45,20,20,20,3A,20 

,24,00,92,05,20,50,52,4F,47, 1171 <217> 

1054 DATA 52,41,4D,4D,20,3A,20,00, 12,20,20 

,2A,2A,2A,20,46,41,40,53,43, 1024 <027> 

1055 DATA 48,45,20,45,49,4E,47,41,42,45,20 

,2A,2A,2A,20,20,92,00,0D,0D, 1058 <098> 

1056 DATA 2A, 2A, 2A, 20,45,4E, 44,45,20,2A, 2A 

,2A,00,13,05,20,20,12,44,92, 920 <148> 

1057 DATA 49,53,4B,20,4F,44,45,52,20,12,54 

,92,41,50,45,0D,00,13,20,20, 1151 <035> 

1058 DATA 49,2F, 4F , 20,2D , 20,46,45,48,40,45 

,52,00,20,D1,B1,20,48,B2,A0, 1606 <012> 

1059 DATA B3 , A9, CF , 20 , FF ,B1,20,8E , B4,85 , FC 

,20,8E,B4,85,FB,05,61,A5,FC, 3207 <251> 

1060 DATA E5,62,90,23,A5,FB,05,5F,A5,FC,E5 

,60,B0,19,20,A7,B4,D0,14,60, 2860 <112> 

1061 DATA 20,A7,B4,F0,00,85,F9,20,A7,B4,F0 

,05,85,F8,40,EF,B0,68,68,20, 2749 <0B8> 

1062 DATA 43, B3,40,5F , B4,20 , CF , FF, 09,40 , D0 

,09,20,Dl,B1,20,48,B2,4C,0B, 2372 <046> 

1063 DATA B6,09,0D, 60, A9,00,85,5E , 20,5F , B4 

,20,EA,B1,20,0D,B5,24,5E,30, 2042 <120> 

1064 DATA 05,20,E4,FF,F0,FB,20,E1,FF,F0,26 

,20,9F,B2,24,5E,10,09,20,4E, 2435 <198> 

1065 DATA B5,20,0D,B5,20,60,B5,20,33,B2,20 

,3F,B2,90,D7,A0,B4,A9,28,20, 2190 <207> 

1066 DATA FF,Bl ,20,E4,FF,C9,0D,D0,F9, A9,00 

,85,5E,A5,61,85,FB,A5,62,85, 3056 <240> 

1067 DATA FC , 20 , E0 , B2,40,64, B1 , A5, FC , 20,4E 

,B1,A5,FB,85,FF,20,4E,B1,A9, 3003 <221> 

1068 DATA 20,A0,3A,20,F2,B1,A0,00,20,ED,B1 

,Bl,FB,20,4E,B1,08,00,08,90, 2566 <070> 

1069 DATA F3,20,ED,Bl,24,5E,30,03,A9,12,20 

*V»,20,20,D2,FF,20,10,B2,A5, 2190 <059> 

1070 DATA FF,20,4E,B1,A9,92,20,D2,FF,40,EA 

,B1,A9,FF,85,B8,85,B9,A9,04, 3073 <029> 

1071 DATA 85,BA,20,00,FF,A2,FF,40,09,FF,20 

,CC,FF,A9,FF,40,03,FF,20,5F, 3315 <189> 

1072 DATA B4,A9,80,85,5E,20,4E,B5,20,48,B2 

,A2,24,A9,2D,20,D2,FF,CA,D0, 2596 <111> 

1073 DATA FA,20,EA,B1,20,EA,B1,20,60,B5,4C 

,CI,B4,20,BS,B5,A6,5F,A4,60, 2812 <015> 

1074 DATA A9,61,20,D8,FF,B0,0A,20,B7,FF,29 

,BF,D0,03,40,FB,B4,A9,01,20, 2577 <201> 

1075 DATA 03 , FF, 20,68 , B6, A0, B4, A9,4F , 20, FF 

,B1,20,F9,B1,40,FB,B4,20,68, 2921 <237> 

1076 DATA B6, A9,37, A0, B4,20 , FF , B1,20 , F9, B1 

,A2,08,09,44,F0,06,A2,01,09, 2717 <213> 

1077 DATA 54,D0,F1,A9,01 ,A8,20,BA,FF,A0,00 

,E0,01,F0,1A,A9,40,8D,20,02, 2403 <101> 

1078 DATA A9,3A , 8D ,21,02, B9,01,02,99,22,02 

,CB,00,00,02,90,F4,CB,08,D0, 2182 <127> 

1079 DATA 00,B9,01,02,99,20,02,CB,00,00,02 

,D0,F4,98,A2,20,A0,02,40,BD, 2018 <025> 

1080 DATA FF, 20, B8 , B5, A5, BA , 09,08,90,33 , A6 

,B9,86,57,A9,01,20,03,FF,A9, 2800 <022> 

1081 DATA 60,85, B9,20,00 , FF, B0,28, A5 , BA, 20 

,B4,FF,A5,B9,20,96,FF,20,A5, 2911 <053> 

1082 DATA FF,85,61 , A5,90,4A, 4A,B0, 13,20, A5 

,FF,85,62,20,AB,FF,A5,57,85, 2663 <214> 

1083 DATA B9,A9,00,20,D5,FF,90,03,40,A3,B5 

,86,5F,84,60,A5,BA,C9,01,D0, 2639 <131> 

1084 DATA 0A,AD,3D,03,85,61,AD,3E,03,85,62 

,40,FB,B4,A9,13,20,D2,FF,A2, 2300 <120> 

1085 DATA IC,20,ED,Bl,CA,D0,FA,60, 1230 <214> 

© 64'er 


MSE (Schluß). Dieses Listing können Sie 
(müssen aber nicht) mit dem 
Checksummer 64 V3 eingeben. 
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Butler - Eine Hilfe für 
Basic- und Assemblerfans 


Machen Sie mehr aus Ihrem C128. »Butler« 
gestattet Ihnen ein komfortableres Arbeiten mit 
dem Computer. Der Editor wurde verbessert, und 
neben einer Reihe von nützlichen Befehlen las¬ 
sen sich von nun an auch Maschinenroutinen des 
Z80-Prozessors vom Basic aus aufrufen. 

B ei dem vorliegenden Programm BUTLER handelt es 
sich um eine Betriebssystemerweiterung, die zu Beginn 
aktiviert werden muß, dann aber stets verfügbar bleibt. 
Das Programm setzt sich aus zwei Teilen zusammen, von 
denen der eine im freien Speicherbereich von $1300 bis 
$1BFF und der andere am oberen Ende des Textspeichers 
zwischen $F000 und $FEFF liegt. Durch Änderung des Zei¬ 
gers, der das Ende des verfügbaren Textspeichers definiert, 
schützt es sich vor Überschreiben durch einen Basic-Text. 

Verwendungsmöglichkeiten 

Das Programm ermöglicht ein komfortableres Arbeiten mit 
dem C128. Es ist nur im C128-Modus verwendbar, da es 
intensiv Betriebssystemroutinen nutzt und speziell auf die 
Besonderheiten und zahlreichen Möglichkeiten des CI28 
zugeschnitten ist. 

Das Betriebssystem wurde im wesentlichen an zwei Stellen 
erweitert: Die Verwendung der Tastatur wurde erleichtert und 
um einige Funktionen erweitert. Das ohnehin umfangreiche 
Basic 7.0 wurde mit weiteren nützlichen Befehlen und Funk¬ 
tionen ausgestattet. 

Aber nicht nur für Basic-Programmierer dürfte dieses Pro¬ 
gramm interessant sein, sondern auch Freunden der Maschi¬ 
nensprache bietet es viele Unterroutinen, auf die zurückge¬ 
griffen werden kann. Detailliertere Information ist dem betref¬ 
fenden Abschnitt dieser Beschreibung zu entnehmen. 

Aktivierung 

Um das Programm zu starten, benutzt man am einfachsten 
den RUN-Befehl: 

RUN "BUTLER" 

Das kleine Basic-Programm lädt die Dateien »/BUTLER.1« 
und »/BUTLER.2« (Dieser Programmteil muß erst generiert 
werden. Lesen Sie dazu die Eingabehinweise am Schluß die¬ 
ses Artikels.) mit dem BOOT-Befehl in den Speicher, wobei 
sie auch gleich initialisiert werden. Die Erweiterung bleibt 
aktiv, bis der RESET-Taster betätigt oder mittels dem Basic- 
Aufruf 

SYS DEC ("1303") 

die Abschaltung veranlaßt wird. Eine erneute Aktivierung ist 
mit 

SYS DEC("1300") 
möglich. 

Tastafurerweiterungen 


Vereinfachte Eingabe von Escape-Sequenzen 

Wer fand es nicht auch schon lästig, beim Einfügen oder 
Löschen von Bildschirmzeilen ständig wechselnd die 
< ESC > -Taste und den jeweiligen Buchstaben drücken zu 
müssen? All jenen ist geholfen! Nun kann man die < ALT>- 


Taste gedrückt halten und dann die betreffende Kommando¬ 
taste betätigen. Dies funktioniert bei allen Escape- 
Sequenzen und natürlich mit automatischer Wiederholung, 
falls die Kommandotaste ebenfalls gedrückt gehalten wird. 

Cursorfunktionen 

Nichts wesentlich Neues, aber zur Verwendung für den 
einen oder anderen vielleicht vorteilhafter, sind folgende 
neue Escape-Sequenzen: 

<ESC> + <HOME> oder <ALT+HOME>: Cursor an 
den Anfang der untersten Fensterzeile 

< ESC > + < Ü > oder < ALT+ Ü >: Fenster ab der aktuel¬ 
len Cursorposition löschen (für deutsche Tastatur) 

< ESC> + < INS/DEL> oder <ALT+INS/DEL>: Fenster¬ 
zeile löschen und restlichen Teil des Fensters nach oben 
schieben (=ESC+D) 

<ESC> + <SHIFT+INS/DEL> oder <ALT+SHIFT+INS/ 
DEL >: Fensterzeiie einfügen; dazu alle Zeilen ab der aktuel¬ 
len nach unten schieben < ESC > + < I > 


LISTfunktionen 


Neben aen einfacheren Funktionen des letzten Abschnitts 
bietet der BUTLER aber auch komplexere Kommandos, um 
das gespeicherte Basic-Programm zu LISTen oder über den 
Bildschirm zu scrollen. Die Kommandos können durch 
Escape-Sequenzen oder als ALTTastenkombinationen ein¬ 
gegeben werden und stellen keine Basic-Befehle dar. Dabei 
ist die aktuelle Position des Cursors stets gleichgültig. 

Um die Kommandos erklären zu können, ist etwas zu deren 
Arbeitsweise vorauszuschicken. Wird ein Kommando ausge¬ 
löst, dann wird das Bildschirmfenster nach einer Zeilennum¬ 
mer abgesucht, und zwar je nach Kommando entweder von 
oben nach unten, um die oberste oder von unten nach oben, 
um die unterste Zeilennummer zu finden. Damit die Suchzeit 
möglichst kurz bleibt, wird eine Zeilennummer nur erkannt, 
wenn sie in der ersten Spalte beginnt. Doch dies ist ja norma¬ 
lerweise immer der Fall. Wird keine Nummer gefunden, 
behandelt das Programm dies als sinnvollen Sonderfall. 

Doch nun zu den Kommandos: 

<ESC> + <CRSR>-unten beziehungsweise <ALT+ 
CRSR>-unten: weiterblättern 

unterste Zeilennummer suchen; falls keine existiert ab Pro¬ 
grammanfang, sonst ab der Basic-Zeile mit nächstgrößerer 
Nummer so viele Zeilen listen, wie im Fenster Platz haben. 
Falls nicht genügend nachfolgende Basic-Zeilen existieren, 
wird stets die letzte' Seite des Programms gelistet. 

<ESC> + <CRSR>-hoch beziehungsweise <ALT+ 
CRSR>-hoch: zurückblättern 

oberste Zeilennummer suchen; falls keine existiert bis Pro¬ 
grammende, sonst bis zur Basic-Zeile mit nächstkleinerer 
Nummer so viele Zeilen listen, wie im Fenster Platz haben. 
Falls nicht genügend vorausgehende Basic-Zeilen existie¬ 
ren, wird die erste Seite des Programms gelistet. 

<ESC> + <CRSR>-rechts beziehungsweise <ALT+ 
CRSR>-rechts: Zeile weiter 
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unterste Zeilennummer suchen; falls keine existiert, die erste 
Seite des Programms listen, sonst die Basic-Zeile mit nächst¬ 
größerer Nummer unter der Zeile mit der gefundenen Zeilen¬ 
nummer ausgeben. 

<ESC> + <CRSR>-links beziehungsweise <ALT+ 
CRSR>-links: Zeile zurück 

oberste Zeilennummer suchen; falls keine existiert, die letzte 
Seite des Programms listen, sonst die Basic-Zeile mit nächst¬ 
kleinerer Nummer in der Fensterzeile vor der Zeile mit der 
oberen Zeilennummer ausgeben. 

<ESC> + <LF> beziehungsweise <ALT+LF>: Seite 
noch einmal 

oberste Zeilennummer suchen; falls keine existiert ab Pro¬ 
grammanfang, sonst ab der zugehörigen Basic-Zeile so viele 
Zeilen ausgeben, wie in das Fenster passen. Falls nicht genü¬ 
gend Basic-Zeilen existieren, um das Fenster zu füllen, wird 
die letzte Seite des Programms gelistet. 

<ALT+HELP>: Bereich um Fehlerzeile listen 
wie der Basic-Befehl HELP, nur werden hier außer der fehler¬ 
haften Zeile zusätzlich einige Zeilen davor und danach aus¬ 
gegeben. 

Wichtige Hinweise 


Anmerkung; Beim Listen der letzten Programmseite oder 
beim Zurückblättern führen Basic-Zeilen, die sich über mehr 
als eine Fensterzeile erstrecken, dazu, daß einige Zeilen 
unnötig ausgegeben werden. 

Bemerkungen zur Verwendung: 

Da die Kommandos sich stets am aktuellen Fensterinhalt 
orientieren, ist es gleichgültig, wie bereits gelistete Zeilen auf 
den Bildschirm gekommen sind. Man kann sich also jederzeit: 
mit dem LIST-Befehl einen Zeilenbereich ausgeben lassen 
und dann zeilenweise weitersrcollen oder seitenweise wei¬ 
terblättern. 

Möchte man sich das Basic-Programm von vorn seiten¬ 
weise ansehen, löscht man einfach das Bildschirmfenster 
und blättert mit <ESC> + <CRSR>-unten oder 
<ALT+CRSR>-unten. Will man von hinten anfangen, löscht 
man ebenfalls das Fenster und blättert entsprechend mit 
<ESC> + <CRSR>-oben oder <ALT+CRSR>-oben. 

Ist man sich über die Arbeitsweise der Kommandos im kla¬ 
ren, dann lassen sich diese noch vorteilhafter einsetzen, 
indem man eine Zeilennummer geeignet im Fenster positio¬ 
niert und dann eines der Kommandos auslöst. 

Basic-Erweiterungen 


Speicherbefehle: 

Wer in Basic mit Bytes hantiert, mußte bisher mit PEEK und 
POKE vorliebnehmen. Doch gerade bei so einfachen, ma¬ 
schinennahen Operationen macht sich die relativ langsame 
Arbeitsgeschwindigkeit schnell bemerkbar, weil man in der 
Regel nicht nur einzelne Bytes, sondern ganze Speicherbe¬ 
reiche zu bewältigen hat. Will man trotzdem nicht gleich auf 
Assembler ausweichen, sind die neuen Operationen dieses 
Abschnitts bestimmt nützlich. 

Wie bei PEEK und POKE muß vor Ausführung eines 
Befehls die zu benutzende Speicherbank angewählt werden. 
Dies kann wie gewohnt mit dem BANK-Befehl erfolgen. Da es 
jedoch zum Beispiel beim Kopierbefehl auch möglich sein 
soll, von einer Speicherbank auf eine andere umzukopieren, 
sind manchmal zwei vorzuwählende Speicherbänke erfor¬ 
derlich. Diese können mit folgendem Befehl eingestellt wer¬ 
den: 

BANKS BankNrl,BankNr2 


für bestimmte Operationen Speicherbank BankNrl und 
BankNr2 vorwählen; der erste Operand überschreibt die mit 
dem BANK-Befehl ausgewählte Speicherbank; der zweite 
Operand wird gesondert gespeichert. 

Im folgenden gilt für die Befehlsoperanden normalerweise 
stets die erste Banknummer. Nur bei Befehlen mit zwei Spei¬ 
cherbereichen wird für den zweiten Bereich die zweite Bank¬ 
nummer verwendet. Der Befehl BANKS wird in den nächsten 
Abschnitten noch mehrfach auftauchen. 

Der Erklärung der Speicherbefehle ist jeweils ein Beispiel 
angefügt. Die Beispiele operieren im 40-Zeichen-Bildschirm- 
speicher, so daß die Wirkungsweise der Befehle direkt mit¬ 
verfolgt werden kann. 

Doch nun die Speicherbefehle im einzelnen: 

MEMFILL Adrl,Adr2,Wert 

Speicherbereich von Adrl bis einschließlich Adr2 mit Wert 
füllen. Beispiel: 

BANK 0 

FOR 1=0 TO 127:MEMFILL 1024,2023,I:SLEEP 1:NEXT 
MEMCOPY Adria,Adrlb,Adr2a 
Speicherbereich von Adria bis einschließlich Adrlb in den 
Bereich ab Adr2a kopieren. Beispiel: 

BANKS 0,1:MEMCOPY 1024,2023,30000 
SCNCLR 0 

BANKS 1,0:MEMCOPY 30000,30999,1024 
MEMSWAP Adria,Adrlb,Adr2a 
Speicherbereich von Adria bis einschließlich Adrlb mit 
dem Bereich ab Adr2a austauschen. Beispiel: 

BANKS 0,1 

FOR 1=1 T0 10:MEMSWAP 1024,2023,30000:NEXT 
MEMINV Adrl,Adr2 

Speicherbereich von Adrl bis einschließlich Adr2 invertie¬ 
ren, also die Reihenfolge aller Bytes im angegebenen 
Bereich umdrehen. Beispiel: 

BANK 0 

FOR 1=1 T0 10:MEMINV 1024,2023:SLEEP 1:NEXT 
MEMROT Adrl,Adr2,Anz 

Speicherbereich von Adrl bis einschließlich Adr2 gemäß 
Anz vorwärts rotieren lassen. Dies bewirkt, daß der Bereich 
von Adrl bis Adrl+Anz ans Ende, der restliche Bereich zum 
Anfang kopiert wird. Beispiel: 

BANK 0:MEMROT 1024,2023,40 
Anmerkung: Der Befehl eignet sich nicht dazu, den 
40-Zeichen-Bildschirm rotieren zu lassen, da die Daten zwi¬ 
schenzeitlich scheinbar wild durcheinander geraten. Der 
Befehl ist vielmehr bei der Vertauschung von aneinander¬ 
grenzenden Datenbereichen unterschiedlicher Größe nütz¬ 
lich, wenn kein Zwischenspeicher zur Verfügung steht. 
MEML0C (Adrl,Adr2,String) 

Speicherbereich von Adrl bis einschließlich Adr2 nach 
dem ersten Auftreten der Zeichenkette String absuchen. 
Eine Zeichenkette wird nur erkannt, wenn sie mit voller Länge 
im angegebenen Bereich liegt. Falls die Suche erfolgreich 
war, wird die Anfangsadresse, sonst stets Null zurückgege¬ 
ben. Beispiel: 

BANK 0:PRINT MEML0C (1024,2023,"123") 

Anmerkung: Möchte man den Bildschirm nach einer ande¬ 
ren Zeichenkette absuchen, ist der spezielle Bildschirmcode 
zu beachten. Bei Ziffern deckt er sich mit dem normalen 
Code. 


Adreßoperationen 

Möchte man auf zwei aufeinanderfolgende Byte zugreifen, 
weil diese beispielsweise einen Zeiger repräsentieren, so ist 
dies mit PEEK und POKE etwas umständlich. Ferner ist es im 
Basic oft gar nicht möglich, den Wert eines Sprungvektors zu 
verändern, der in der Unterbrechungsroutine verwendet 
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wird, ohne daß zwischenzeitlich ein inkonsistenter Sprung¬ 
vektor entsteht, der dann zum Absturz des Computers führt. 

Erleichterung schaffen folgende neuen Operationen: 

CHG Adr,Wert 

Speicherstellen Adr und Adr+1 mit dem niederwertigen 
und dem höherwertigen Byte des Operanden Wert beschrei¬ 
ben. Unterbrechungen werden während des Änderns nicht 
zugelassen. 

VEC (Adr) 

Werte der Speicherstellen Adr und Adr+1 auslesen und in 
eine Adresse umrechnen. Bei Adr muß das niederwertige, bei 
Adr+1 das höherwertige Byte stehen. Beispiel: 

BANK 0 


PRINT VEC(4624)-VEC(45) 
CHG 4633,DEC("8000") 
PRINT USR(l) 

CHG 808,DEC("F4A2") 


Länge des Basic-Textes 
USR-Vektor ändern 
und verwenden 
< RUN/STOP >- 
Taste inaktivieren 
und wieder aktivieren 
Nummer einiesen, 
Anfangsadresse 
der zugehörigen 
Basic-Zeile suchen 
und ausgeben 


CHG 808,DEC("F66E") 

10 INPUT "NR ";B 
20 A=45:BANK 0 
30 D0:A=VEC(A):NR=VEC(A+2) 

40 LOOP UNTIL A=0 0R NR=B 
50 PRINT "ADR: ";A 

Mit den beiden letzten Operationen läßt sich also das Zerle¬ 
gen eines Wertes in niederwertiges und höherwertiges Byte 
vermeiden. Sollten diese Bytes aber dennoch von Interesse 
sein, lassen sie sich mit folgenden zwei Funktionen leicht 
berechnen: 

LOW (Wert) niederwertiges Byte von Wert 

HIGH (Wert) höherwertiges Byte von Wert 
Beispiel: 

PRINT LOW(64000) 

PRINT HIGH( 64000) S^fiR Onun«*» 

Keiner langen Vorrede bedarf der Befehl 
OLD _ 


- Verbinden von Programmteilen: 

Ersten Programmteil laden, mit HIDE verstecken, zweiten 
Programmteil normal laden, umnumerieren und dann mit 
UNITE anhängen. 

- Programmteile während des Programmlaufs austauschen 
oder nachladen: Beispiel: 

1 HIDE 10 

2 BL0AD"ROUTINE 1",0N B0,P(VEC(45)) 

3 UNITE:G0SUB 9 

4 HIDE 10 

5 BL0AD"ROUTINE 2",0N B0,P(VEC(45)) 

6 UNITE:G0SUB 9 

7 HIDE 10:BANK 0:CHG VEC(45),0:UNITE 

8 END 

9 REM ### Aufrufadresse ### 

Dieses Beispiel setzt voraus, daß auf der Diskette die zwei 
Unterprogramme ROUTINE 1 und ROUTINE 2 stehen, die 
mit einer Zeilennummer beginnen. Ferner müssen die Routi¬ 
nen mit RETURN enden, da sie mit GOSUB aufgerufen wer¬ 
den. 

Wie diesem Beispiel zu entnehmen ist, kann das Programm 
im versteckten Teil weiterlaufen. In diesem Teil werden jedoch 
keine Zeilennummern mehr gefunden, da der Basic- 
Interpreter mit der Suche erst beim restlichen Teil beginnt. 

Nach so vielen Erläuterungen nun noch zu einem anderen 
Befehl, der weniger mit Programmzeigern, sondern viel mehr 
mit Programmzeilen hantiert: 

TRANS Nummerla,Nummerlb,Nummer2 
Alle Zeilen des Zeilenbereichs von Nummerla bis 
Nummerlb vor der Zeile mit Nummer2 einfügen. 


Aufruf des Z80-Prozessors 
von Basic aus 


zum Wiederherstellen eines mit NEW gelöschten Basic- 
Programms. Häufiger wird diese Anweisung jedoch dann 
angewendet, wenn nach Drücken des RESET-Knopfs das 
Programm wiederhergestellt werden soll. Da bei der Neuini¬ 
tialisierung nach Drücken des RESET-Knopfs auch die Basic- 
Erweiterung inaktiviert wird, ist es in diesem Fall zunächst 
erforderlich, sie mit SYS DEC(" 1300 ") erneut zu aktivieren. 

Vielseitiger als der OLD-Befehl ist der Befehl 
HIDE Nummer oder HIDE, 

der es ermöglicht, den Anfang des Basic-Textes vorüberge¬ 
hend zur angegebenen Zeile oder ganz ans Programmende 
zu legen, so daß der vordere Teil des Programms abgespalten 
bleibt, bis er mit dem Befehl 
UNITE 

wieder mit dem restlichen Programmtext verbunden wird. 


Achtung: Die Nummern werden beim Kopieren nicht verän¬ 
dert. Daher sollten die Zeilen anschließend mit dem 
RENUMBER-Befehl neu durchnumeriert werden. Da das 
Neunumerieren nur dann durchgeführt wird, wenn alle Zei¬ 
lenreferenzen aufgelöst werden können, sollte dies schon 
vorher sichergestellt sein, da die Korrektur des Programms 
nach dem Kopieren wegen der dann nicht streng steigenden 
Zeilennumerierung oft nicht mehr möglich ist. 

Der letzte Befehl ist also zwar sehr nützlich, aber auch 
äußerst tückisch, wenn man nicht genügend aufpaßt. Vor¬ 
sicht ist stets angebracht und nur geübte Benutzer sollten 
diesen Befehl bei ungesicherten Programmen anwenden. 

In der Regel führt der Z80-Prozessor im CI28 ein stilles 
Dasein. Wer mit der Programmierung dieses Mikroprozes¬ 
sors vertraut ist, kann ihn jetzt vom Basic aus mit dem Befehl 


Manipulieren und Editieren 
des Programmtextes 


Die beiden letzten Befehle eröffnen interessante Anwendun¬ 
gen. 

- schnelleres Editieren großer Programme: 

Mit HIDE den vorderen Teil abtrennen. Dann läßt sich der 
Rest bequemer editieren, weil das Eingeben von Zeilen 
schneller erfolgt. Zum Schluß ist mit UNITE wieder alles zu 
verbinden. 

- getrenntes Speichern eines hinteren Programmteils: 

Mit HIDE an der gewünschten Stelle das Programm tren¬ 
nen, hinteren Teil wie gewohnt speichern, und dann entwe¬ 
der mit UNITE alles wieder verbinden oder aber mit NEW den 
gespeicherten Teil löschen und erst dann UNITE verwenden. 


Z80CALL Adresse 

aufrufen. Die Unterroutine muß stets in der Speicherbank 0 
stehen. 


Die Verwendung dieses Prozessors kann mitunter sinnvoll 
sein, da er zum Beispiel einen mächtigen Kopierbefehl kennt. 
Beispiele: 

im Monitor einzugeben: 


> 0A000 01 00 20 11 00 80 21 00 

> 0A008 20 ED B0 C9 


$01 $00 $20 
$11 $00 $80 
$21 $00 $20 
$ED $B0 
$C9 


LD BC,2000H 
LD DE,8000H 
LD HL,2000H 
LDIR 
RET 


(Anzahl) 

(Ziel) 

(Quelle) 


Aufruf vom Basic aus: 


Z80CALL DEC("A000") 

Diese kurze Routine kopiert 8 KByte von Adresse $2000 
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bis $3FFF nach Adresse $8000 bis S9FFF, und dies einiges 
schneller als der 8502-Prozessor. 


Folgendes ist wieder im Monitor einzugeben: 
> 0B000 01 FF 1F 11 01 20 21 00 


> 0B008 20 36 01 ED BO C9 


$01 $FF $1F 
$11 $01 $20 
$21 $00 $20 
$36 $01 
$ED $B0 
$C9 


LD BC,1FFFH 
LD DE,2001H 
LD HL,2000H 
LD (HL),1 
LDIR 
RET 


(Anzahl) 

(Ziel) 

(Quelle) 

(Wert) 


Aufruf vom Basic aus: 


Z80CALL DEC("B000") 

Bei dieser Routine wird ebenfalls der Blockkopierbefehl 
LDIR verwendet, hier jedoch dient er dazu, den Speicherbe¬ 
reich von $2000 bis $3FFF mit 1 zu füllen. Dies ist möglich, 
weil der Blockkopierbefehl von vorn nach hinten kopiert. 

Anmerkung: Im Adreßbereich von $0000 bis $0FFF ist für 
den Z80 ein spezielles ROM eingeblendet, so daß er auf das 
RAM in diesem Adreßbereich leider nicht zugreifen kann. 


NEWESC Wert,Adresse 

Neue Escape-Sequenz für das Zeichen mit ASCII-Code 
Wert definieren. Bei der Eingabe der zugehörigen Escape- 
Sequenz beziehungsweise ALTTastenkombination wird die 
Routine unter der angegebenen Adresse aufgerufen. Als 
Speicherbank wird die zuvor eingestellte verwendet. Bei¬ 
spiel: 

BANK 15 

NEWESC ASC ( "1"),DEC( "CABC ") 

NEWESC ASC( "2 "),DEC ( "CACA ") 

<ESC> + <1> beziehungsweise <ALT+1> scrollt 
danach den Bildschirm hoch. <ESC> + <2> beziehungs¬ 
weise <ALT+2> scrollt analog dazu abwärts. 

NEWCMD Name,Adresse 

Neuen Basic-Befehl definieren. Die Routine ab der ange¬ 
gebenen Adresse auf der eingestellten Bank muß eventuelle 
Parameter selbst einiesen und auswerten. Beispiel: 

BANK 15 

NEWCMD "BELL ", DEC ( "C98E'') 

BELL 


flexible Erweiterungen 


Die bisher vorgestellten Erweiterungen sind alle möglichst 
allgemein gehalten und bilden in der Regel nur eine Basis 
dessen, was man sich vielleicht für seine persönlichen Pro¬ 
blemstellungen wünschen würde. Um weitergehenden Wün¬ 
schen entgegenzukommen, bietet BUTLER die Möglichkeit, 
die Tastatur- und vor allem die Basic-Erweiterungen einfach 
zu ergänzen oder umzudefinieren: 


NEWFN Name,Adresse 

Neue Basic-Funktion vereinbaren. Ein Funktionsparameter 
wird automatisch ausgewertet, die restlichen müssen selbst 
eingelesen werden. Beispiel: 

BANK 1 

P0KE 30000,96:REM Code für RTS 
NEWFN "DUMMY",30000 
PRINT DUMMY(99) 

PRINT DUMMY("ABC") 
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Anmerkung: Wie an diesem Beispiel erkennbar ist, muß die 
Typprüfung von der Funktionsroutine vorgenommen werden. 

So schön die Möglichkeiten der drei letzten Befehle auch 
sind, so setzen sie doch einige Erfahrung mit der Program¬ 
mierung geeigneter Routinen voraus. Die notwendige Erfah¬ 
rung kann man durch Analyse entsprechender Betriebs¬ 
systemroutinen erlangen. 

Codierung der neuen Befehle 


Sicherlich von Interesse dürfte noch sein, wie die neuen 
Befehle verschlüsselt werden. Das Betriebssystem ermög¬ 
licht es, Erweiterungen durch zwei Byte ($CE $xx bei Funk¬ 
tionen, $FE $xx bei Anweisungen) zu kodieren. Das 
Betriebssystem selbst verwendet bereits die Kodierungen 
bis $CE $0A, beziehungsweise $FE $26. Die neuen Funk¬ 
tionen und Befehle von BUTLER verwenden Kodierungen bis 
$CE $0E, beziehungsweise $FE $37. Für künftige Erweite¬ 
rungen sind auch die Kodierungen bis $CE $1A, beziehungs¬ 
weise $FE $56 reserviert. Somit werden die selbstdefinier¬ 
ten Erweiterungen ab $CE $1B oder $FE $57 durchnume¬ 
riert. Dies geschieht in der Reihenfolge der Vereinbarungen 
und kann nicht beeinflußt werden. Mit dem Befehl 
CLRNEWS 

kann lediglich sichergestellt werden, daß die Kodezuweisung 
stets ab den angegebenen Werten beginnt. Dabei werden 
alle zuvor definierten Erweiterungen inaktiviert. Programme, 
die sich Erweiterungen selbst definieren, sollten diesen 
Befehl verwenden, um eine definierte Startumgebung vorzu¬ 
finden. 

Die Wirkung des letzten Befehls, aber viel mehr noch eine 
gesamte Neuinitialisierung von BUTLER und einiger wichti¬ 
ger Betriebssystemdaten werden durch den Befehl 

RESET 

erreicht. Dieser Befehl ist besonders dann sinnvoll, wenn 
Sprungvektoren zwischenzeitlich verändert wurden und nun 
wieder ihre alten Werte erhalten sollen. 

Schnittstelle zur 
Maschinenprogrammebene 

Bankübergreifende Programmierung 

Beim C128 verfügt man zwar über verschiedene Spei'chsr- 
bänke, die vom Basic aus relativ einfach zu handhaben sind, 
doch sobald Maschinenprogramme zu schreiben sind, die 
auf eine andere Bankzugreifen sollen, erweist sich das Spei¬ 
cherbankkonzept als umständlich. Schon bei der Verwen¬ 
dung von Betriebssystemroutinen zeigen sich die ersten Pro¬ 
bleme. Um eine Routine direkt aufrufen zu können, muß das 
betreffende ROM bereits beim Aufruf eingeblendet sein. 
Dies schränkt die Lage und die Größe des Maschinenpro¬ 
gramms ein. Ferner ist nicht stets gewährleistet, daß beim 
Rücksprung aus der Betriebssystemroutine das aufrufende 
Programmstück noch (oder wieder) sichtbar ist. Um letzte¬ 
rem Problem aus dem Weg zu gehen, aber auch um Routinen 
»unter« das Betriebssystem legen zu können, verfügt BUT¬ 
LER über eine spezielle Aufrufroutine, mit der Unterpro¬ 
gramme im ROM bequem aufgerufen werden können. 
Ebenso existiert eine Routine, die es gestattet, ein Unterpro¬ 
gramm in einer beliebigen Speicherbank aufzurufen. 

Die Verwendung sei an Beispielen erläutert: 


am 


Ungewöhnlich mag erscheinen, daß direkt hinter dem Auf¬ 
rufbefehl Daten stehen. Diese Daten werden von den speziel¬ 
len Aufrufroutinen gelesen und der Programmzähler korri¬ 
giert, so daß beim Rücksprung das Programm hinter den 
Daten fortgesetzt wird. Diese Übergabetechnik erlaubt es, 
alle Register normal verwenden zu können, setzt aber auch 
voraus, daß stets mit JSR aufgerufen wird, selbst wenn der 
nächste Befehl »nur« ein RTS ist. 

Sprünge ins ROM oder auf eine andere Bank sind mit der 
letzten Routine nicht möglich. Ist dies doch einmal notwen¬ 
dig, dann kann man sich eventuell wie folgt helfen: 

LDA # Adr-1 ;höherwertiges Byte 

PHA ;merken 

LDA #Adr-1 ;niederwertiges Byte 

PHA ;merken 

LDA #Konfig ;gewünschte Konfiguration 

JMP $02DF ;umkonfigurieren und springen 

Bei diesem Beispiel darf die anzugebende Konfiguration 
nicht mit der Banknummer verwechselt werden. Welche Kon¬ 
figuration für welche Speicherbank zu wählen ist, kann einer 
Tabelle entnommen werden, wobei die Banknummer als 
Index dient. Das Original dieser Tabelle steht im ROM ab 
$F7F0, eine Kopie aber auch in BANK 0 ab $1310, wenn 
BUTLER verwendet wird. 

Wer sich bereits mit der bankübergreifenden Programmie¬ 
rung beschäftigt hat, wird sicherlich die vorhandenen Routi¬ 
nen ab $02CD und $02E3 kennen, doch deren Verwendung 
ist bisweilen recht umständlich und einschränkend, weil beim 
Aufruf Teile des ROMs aktiviert sein müssen. 

Einbinden von Erweiterungen 

Nicht nur direkt vom Basic aus, sondern auch auf Maschi¬ 
nenspracheebene lassen sich Erweiterungen definieren, 
ie d'ps möglich ist, soll an kommentierten Beispielen erläu- 
'ertien. 


Tastaturerweiterungen 

Die notwendigen Daten für die Erweiterungen müssen in 
einer Liste abgelegt sein. Jeder Listeneintrag muß nachfol¬ 
gende Struktur aufweisen: 

Konfiguration, Aufrufadresse-1, ASCII-Code 

Listeneinträge sind lückenlos aneinanderzuhängen, und 
das Ende der Liste ist nicht zu kennzeichnen. Statt dessen 
ist beim Aufruf die Anzahl der Listenelemente (im Akkumula¬ 
tor) zu übergeben. Da diese Liste nicht notwendigerweise in 
der Speicherbank 0 stehen muß, ist auch die Banknummer 
(im X-Register) anzugeben. Schließlich muß noch die An¬ 
fangsadresse der Liste in der Zeropage bei $24/$25 bereit¬ 
gestellt werden. Beispiel: 


Liste 


JSR $1396 
.WORD Adr 
JSR $13C7 
.BYTE Bank 
.WORD Adr 


ROM-Aufruf veranlassen 
ROM-Adresse low/high 
Bank-Aufruf veranlassen 
Bank-Nr (0 bis 15) 

Adresse der Routine (low/high) 


LDA #Liste 

;Zeiger auf 

LDY #Liste 

;Liste 

STA $24 

;in der Zeropage 

STY $25 

jablegen 

LDX #0 

jBankNr der Liste 

LDA #2 

;Elementanzahl 

JMP $F15D 

;Tastatur erweitern 

.BYTE $3F 

j Konfiguration 

.WORD Belegl-1 

;Adr-l (low,high) 

.BYTE '1' 

;ESC 1 

.BYTE $3F 

;Konfiguration 

.WORD Beleg2-1 

;Adr-1 (low,high) 

.BYTE '2' 

;ESC 2 

LDA #Tabl 

;Zeiger auf 

LDX #Tabl 

;erste Fkts-Tastenbelegung 

LDY # TabLgl 
BNE DefBel 

jund deren Länge 
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Beleg2 LDA 

#Tab2 

;Zeiger auf 

LDX 

#Tab2 

;zweite Fkts-Tastenbelegung 

LDY 

# TabLg2 

;und deren Länge 

DefBel STA 

$24 

;Zeiger in 

STX 

$25 

;Zeropage ablegen 

KopBel DEY 


> 

LDA 

($24),Y 

;neue Funktions- 

STA 

$1000,Y 

jtastenbelegung 

TYA 


;umkopieren 

BNE 

KopBel 

f 


RTS 

Tabl .BLOCK 
.BLOCK 
.BLOCK 
.BLOCK 
.BLOCK 
.BLOCK 
TabLgl .EQU 

Tab2 .BLOCK 


10,6,10,5,6,4,5,8,4,5 
'PRINT DS$ 1 ,13,'DLOAD"' 

'DIRECTORY',13,'BOOT"' 

'DSAVE"', 'RUN"' 

'LIST',13, 'MONITOR',13;F7,F8 

'RUN',13, 'HELP',13 ;RUN,HELP 

#-Tabl 


;Stringlängen 
JF1,F2 
JF3,F4 
;F5,F6 


7, 5,6,7,4,5,3,6,4,5 


;Stringlängen 


100 PRINT 

110 PRINT "***{3SPACE>BUTLER{3SPACE>*** 

120 PRINT "(C)HJB<4SPACE>01.06.86 

130 BANK 0 

140 BOOT "/BUTLER.1" 

150 BOOT "/BUTLER.2" 

160 POKE 62442,169 

Listing 1. »Butlem-Ladeprogramm 


.BLOCK 
.BLOCK 
.BLOCK 
.BLOCK 
.BLOCK 
TabLg2 .EQU 


'GRAPHIC' 

'LOCATE', 

’DRAW, 

'BOX', 

'RUN',13, 

*-Tab2 


’COLOR' 
'SCNCLR',13 
’PAINT’ 
'CIRCLE'- 
'HELP',13 


;F1,F2 
;F3,F4 
;F5,F6 
;F7,F8 
;RUN,HELP 


Basic-Erweiterungen 

Ganz analog verläuft die Definition von Basic-Erweite¬ 
rungen, nur die Struktur der Listenelemente ist etwas anders: 
Typ, BankNr, Aufrufadresse, Name, Null 
Als Typen sind die Werte 0 (bei Funktionen) und 1 (bei 
Befehlen) zulässig. Der Name der Funktion beziehungsweise 
des Befehls ist direkt in die Liste einzutragen und muß durch 
eine Null abgeschlossen werden. Die Anfangsadresse der 


Liste muß in $5A/$5B bereitstehen. Beispiel: 

LDA #Liste 

;Zeiger auf 

LDY #Liste 

;Liste 

STA $5A 

;in der Zeropage 

STY $5B 

;ablegen 

LDX #0 

;BankNr der Liste 

LDA #2 

;Elementanzahl 

JMP $F23E 

;Basic erweitern 

Liste .BYTE 0 

;Typ=Funktion 

.BYTE 0 

;BankNr 

.WORD LnAdr 

;Adr (low,high) 

.BLOCK 'LNADR' 

;Name (’line adress') 

.BYTE 0 

;Ende des Namens 

.BYTE 1 

;Typ=Befehl 

.BYTE 0 

> BankNr Fortsetzung 


646R OnLin®»* 


Name 

/butler. 




1300 173e 

1470 

14 

8d 

01 

ff 

60 

20 

7c 

14 

ac 

15fO 

a6 

79 

4c 

6a 

51 

4c 

32 

51 

96 











1478 

8d 

02 

ff 

60 

20 

20 

13 

6c 

3a 

15f 8 

fO 

Od 

48 

ac 

d5 

15 

ad 

d7 

83 

1300 

4c 

06 

13 

4c 

34 

13 

08 

78 

8b 

1480 

ea 

03 

20 

89 

14 

8d 

01 

ff 

d7 

1600 

15 

20 

e2 

43 

68 

bO 

03 

4c 

f 7 

1308 

20 

34 

13 

20 

54 

13 

28 

60 

4a 

1488 

60 

8d 

02 

ff 

6c 

ea 

03 

20 

9a 

1608 

26 

43 

ad 

cf 

15 

69 

73 

c5 

2b 

1310 

3f 

7f 

bf 

ff 

16 

56 

96 

d6 

lb 

1490 

20 

13 

20 

cf 

ff 

8d 

01 

ff 

ac 

1610 

Od 

a9 

8a 

a2 

ff 

bO 

07 

e8 

5c 

1318 

2a 

6a 

aa 

ea 

06 

Oa 

01 

00 

34 

1498 

60 

20 

20 

13 

20 

d2 

ff 

8d 

27 

1618 

69 

27 

38 

ed 

cf 

15 

4c 

bO 

19 

1320 

08 

48 

a9 

00 

8d 

00 

ff 

68 

60 

14a0 

01 

ff 

60 

20 

20 

13 

20 

el 

9c 

1620 

43 

cd 

cf 

15 

bO 

ld 

c9 

02 

ff 

1328 

28 

60 

08 

48 

a9 

3f 

8d 

00 

56 

14a8 

ff 

8d 

01 

ff 

60 

20 

20 

13 

5c 

1628 

90 

19 

e9 

Ob 

20 

60 

16 

68 

4f 

1330 

ff 

68 

28 

60 

08 

78 

20 

20 

7f 

14b0 

20 

e4 

ff 

8d 

01 

ff 

60 

20 

c6 

1630 

68 

a5 

16 

48 

a5 

J7 

48 

20 

6e 

1338 

13 

20 

51 

42 

a2 

lf 

bd 

73 

f 9 

14b8 

20 

13 

20 

7d 

41 

20 

ee 

eO 

ac 

1638 

5a 

16 

68 

85 

17 

68 

85 

16 

5f 

1340 

eO 

9d 

14 

03 

ca 

10 

f 7 

a2 

a7 

14c0 

20 

Oc 

14 

20 

e2 

02 

20 

e2 

74 

1640 

4c 

56 

79 

4c 

6c 

79 

c9 

02 

5d 

1348 

09 

bd 

65 

cO 

9d 

34 

03 

ca 

be 

14c8 

02 

a9 

6e 

8d 

18 

03 

a9 

13 

53 

1648 

90 

f 9 

cd 

dO 

15 

bO 

f 4 

6d 

e8 

1350 

10 

f 7 

28 

60 

20 

b7 

14 

20 

c2 

14d0 

8d 

19 

03 

a9 

fd 

8d 

3c 

03 

23 

1650 

cf 

15 

e9 

31 

20 

60 

16 

20 

e8 

1358 

c7 

13 

00 

e2 

02 

20 

c7 

13 

6c 

14d8 

a9 

14 

8d 

3d 

03 

a9 

42 

8d 

38 

1658 

80 

03 

20 

dO 

02 

4c 

cd 

02 

3a 

1360 

01 

e2 

02 

60 

00 

28 

43 

29 

00 

14e0 

38 

03 

a9 

15 

8d 

39 

03 

4c 

ee 

1660 

85 

79 

Oa 

65 

79 

a8 

ad 

dl 

08 

1368 

48 

4a 

42 

01 

06 

56 

d8 

a9 

50 

14e8 

bl 

15 

ed 

14 

04 

00 

9e 

ca 

72 

1668 

15 

85 

06 

ad 

d3 

15 

85 

07 

81 

1370 

7f 

8d 

Od 

dd 

ac 

Od 

dd 

30 

cO 

14fO 

bd 

00 

51 

ca 

14 

00 

3c 

ca 

23 

1670 

a9 

3f 

8d 

00 

ff 

bl 

06 

85 

cd 

1378 

la 

20 

3d 

f 6 

20 

el 

ff 

dO 

83 

14f 8 

94 

00 

60 

15 

13 

48 

8a 

29 

37 

1678 

02 

c8 

bl 

06 

85 

04 

c8 

bl 

Oa 

1380 

12 

20 

56 

eO 

20 

09 

el 

20 

66 

1500 

Of 

c9 

08 

68 

bO 

03 

4c 

ad 

b3 

1680 

06 

85 

03 

a9 

00 

8d 

00 

ff 

ab 

1388 

00 

eO 

20 

06 

13 

20 

20 

13 

8a 

1508 

c6 

a6 

dO 

e8 

ec 

20 

Oa 

bO 

cc 

1688 

60 

Of 

06 

13 

52 

45 

53 

45 

7b 

1390 

4c 

5c 

fa 

4c 

5f 

fa 

08 

48 

dl 

1510 

Ob 

9d 

4a 

03 

a9 

lb 

9d 

49 

59 

1690 

d4 

00 

4c 

3d 

17 

00 

00 

a9 

e4 

1398 

8a 

48 

98 

48 

ba 

bd 

05 

01 

25 

1518 

03 

e8 

86 

dO 

4c 

c4 

c6 

aa 

a6 

1698 

00 

8d 

9d 

16 

60 

00 

20 

83 

17 

13a0 

85 

ce 

bd 

06 

01 

85 

cf 

aO 

79 

1520 

ad 

ea 

14 

85 

da 

ad 

eb 

14 

eb 

16a0 

16 

20 

6a 

15 

8d 

01 

ff 

60 

a5 

13a8 

02 

fe 

05 

01 

dO 

03 

fe 

06 

b8 

1528 

85 

db 

ad 

ec 

14 

fO 

ii 

Oa 

cb 

16aB 

20 

83 

16 

20 

7a 

15 

8d 

01 

9c 

13b0 

01 

bl 

ce 

99 

e9 

03 

88 

dO 

eb 

1530 

Oa 

a8 

8a 

8d 

01 

ff 

88 

dl 

bB 

16bO 

ff 

60 

20 

83 

16 

20 

58 

cb 

b3 

13b8 

fO 

a9 

01 

8d 

ed 

03 

68 

a8 

59 

1538 

da 

fO 

06 

88 

88 

88 

dO 

f 6 

lb 

16b8 

8d 

01 

ff 

60 

20 

83 

16 

20 

88 

13c0 

68 

aa 

a9 

00 

4c 

e4 

03 

08 

fO 

1540 

18 

60 

20 

lf 

15 

bO 

06 

20 

a4 

16cO 

ee 

16 

8d 

01 

ff 

60 

20 

83 

c7 

13c8 

48 

8a 

48 

98 

48 

ba 

bd 

05 

d6 

1548 

20 

13 

4c 

cl 

c9 

a9 

02 

48 

cO 

16c8 

16 

20 

64 

50 

8d 

01 

ff 

60 

b3 

13d0 

01 

85 

ce 

bd 

06 

01 

85 

cf 

ld 

1550 

a9 

de 

48 

88 

bl 

da 

48 

88 

af 

16d0 

20 

20 

13 

20 

23 

51 

8d 

01 

be 

13d8 

aO 

03 

dO 

03 

99 

e9 

03 

fe 

81 

1558 

bl 

da 

48 

88 

bl 

da 

4c 

df 

7c 

16d8 

ff 

60 

20 

83 

16 

20 

80 

03 

ea 

13e0 

05 

01 

dO 

03 

fe 

06 

01 

bl 

82 

1560 

02 

46 

ef 

a6 

e4 

86 

eb 

4c 

21 

16eO 

8d 

01 

ff 

60 

20 

83 

16 

20 

bO 

13e8 

ce 

88 

dO 

fO 

aa 

bd 

10 

13 

4b 

1568 

bl 

cb 

a4 

e6 

84 

ec 

20 

7d 

30 

16e8 

80 

03 

8d 

01 

ff 

60 

ad 

9d 

62 

13f0 

85 

ce 

a9 

01 

8d 

ed 

03 

68 

8c 

1570 

c7 

20 

8d 

15 

20 

63 

c3 

4c 

12 

16f 0 

16 

fO 

03 

4c 

Oa 

ef 

ce 

9d 

5f 

13f 8 

a8 

68 

aa 

a5 

ce 

4c 

e4 

03 

lc 

1578 

4e 

ca 

a4 

e6 

84 

ec 

20 

7d 

5c 

16f 8 

16 

a5 

ec 

85 

e9 

a5 

eb 

85 

53 

1400 

8d 

00 

ff 

68 

28 

20 

00 

00 

le 

1580 

c7 

20 

b5 

cb 

20 

99 

15 

20 

al 

1700 

e8 

98 

48 

8a 

48 

a9 

Od 

4c 

36 

1408 

8d 

01 

ff 

60 

a 2 

Ob 

bd 

00 

9b 

1588 

bb 

cb 

4c 

4e 

ca 

e6 

eb 

20 

d3 

1708 

6e 

c2 

08 

48 

8a 

48 

98 

48 

cO 

1410 

14 

9d 

e4 

03 

ca 

10 

f 7 

60 

5a 

1590 

74 

cb 

bO 

f 9 

c6 

eb 

4c 

5c 

Ob 

1710 

ad 

00 

ff 

48 

aO 

00 

ba 

fe 

b9 

1418 

8d 

aa 

02 

48 

bd 

10 

13 

8d 

48 

1598 

cl 

a6 

e5 

e4 

eb 

bO 

03 

4c 

ab 

1718 

06 

01 

dO 

03 

fe 

07 

01 

bd 

db 

1420 

27 

14 

68 

60 

86 

79 

a2 

00 

36 

15aO 

70 

c8 

24 

f 8 

10 

05 

a5 

e4 

26 

1720 

06 

01 

85 

ce 

bd 

07 

01 

85 

05 

1428 

20 

a2 

02 

08 

a6 

79 

28 

60 

b3 

15a8 

4c 

6f 

c3 

20 

7c 

c3 

4c 

85 

c3 

1728 

cf 

bl 

ce 

fO 

05 

20 

99 

14 

81 

1430 

8d 

b9 

02 

48 

bd 

10 

13 

8d 

e7 

15b0 

cb 

a9 

21 

8d 

fc 

02 

a9 

16 

fd 

1730 

90 


68 

8d 

00 

ff 

68 

a8 

fl 

1438 

40 

14 

68 

60 

08 

86 

79 

a2 

88 

15b8 

8d 

fd 

02 

a2 

05 

bd 

c9 

15 

a8 

1738 

68 

aa 

68 

28 

60 

60 

lc 

ce 

2c 

1440 

00 

20 

af 

02 

a6 

79 

28 

60 

14 

15cO 

9d 

Oc 

03 

ca 

10 

f 7 

4c 

92 

95 











1448 

8d 

c8 

02 

48 

bd 

10 

13 

8d 

87 

15c8 

16 

f 8 

15 

db 

15 

46 

16 

Ob 

Od 











1450 

57 

14 

68 

60 

86 

79 

a2 

00 

96 

15d0 

28 

89 

89 

16 

16 

8c 

8c 

16 

06 

Listina 2. 

>/Butler.1< 

. Bitte 

□eben 


1458 

20 

be 

02 

08 

a6 

79 

28 

60 

fl 

15d8 

16 

75 

59 

c9 

02 

90 

16 

e8 

07 











1460 

aO 

ff 

8d 

ea 

03 

8c 

eb 

03 

Ob 

15eO 

dd 

cf 

15 

bO 

10 

7d 

d9 

15 

7f 

sie aieses usung mit aem m&t im 

1468 

a9 

01 

8d 

ed 

03 

60 

20 

7c 

60 

15e8 

85 

79 

bc 

db 

15 

bd 

d7 

15 

de 

C64-Modus ein. 
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mir-iy 


?$$$$$; 


’Mi f«%.‘ r^'i <w 

> Vi ; '.; ? ;v'-.v /,;h < -. i- .-i', 

•■ •*’•?{« l\ 

_ 'tmmrm."ktn ,#!/ w >'*#w • 

«e. OMfJ/l’ ••;■ W/i 'iH? mWftM 

. m 

Wh. sä, 

-■: - -,-Vvv, ■ i ,/■ ^.Vy/V^V. • ^.,'WÄV 



.WORD ListLn 

;Adr (low,high) 


.BLOCK 'LISTLN' 

1 ;Name (’list line’) 


.BYTE 0 

;Ende des Namens 

LnAdr 

JSR 

$F0CF 

;Real nach Integer wandeln 


JSR 

$16C6 

zugehörige Zeile suchen 


LDY 

$61 

;Adresse ins Y-Reg. und 


LDA 

$62 

;Akku. (low/high Byte) 


BCS 

AdrOk 

;falls Zeile gefunden 


LDA 

#0 

;sonst Null 


TAY 


jals Adresse 

AdrOk 

JMP 

$F105 

;Y/A nach Real wandeln 

ListLn JSR 

$F0DB 

;Integer-Wert einiesen 


JSR 

$16C6 

Zugehörige Zeile suchen 


BCC 

Ende 

jfalls nicht gefunden: Ende 


LDX 

$16 

;sonst Nummer 


LDA 

$17 

;laden und 


JSR 

$16D0 

;Zeile auflisten 

Ende 

RTS 




Das angeführte Beispiel enthält eine Funktion zur Bestim¬ 
mung der Anfangsadresse einer Basic-Zeile und einen 
Befehl zum Auflisten einer einzelnen Basic-Zeile. Hierbei 
werden mehrfach BUTLER-Routinen verwendet, die ihrer¬ 
seits Routinen im ROM aufrufen. Diese ROM-Routinen 
könnte man auch direkt aufrufen, wenn man die speziellen 
Aufrufroutinen verwendet, die am Anfang des Kapitels vorge¬ 
stellt wurden. 

Tips zur Speicherbelegung 


Die mit dem BANK-Befehl vorgewählte Speicherbank wird 
bekanntlich an der Adresse $03D5 abgelegt. Die mit dem 
neuen BANKS-Befehl vorwählbare zweite Speicherbank ist 
an der Adresse $03FD zu finden. Die Speicherstellen $03FE 
und $03FF sind für andere Anwendungen reserviert. Außer¬ 
dem ist darauf zu achten, daß der Bereich von S03E4 bis 
$03EF intensiv verwendet wird und nicht anderweitig ver¬ 
wendet werden kann. 

BUTLER selbst besteht aus zwei Teilen, die in BANK 0 in 
den Bereichen von $1300 bis $19FF und von $F000 bis 
$FCFF liegen. Ab $1A00 bis maximal $1BFF ist die Tabelle 
der Basic-Erweiterungen zu finden. Die zugehörige Sprung¬ 
tabelle beginnt bei $FD00, gefolgt von der Tabelle für die 
neuen Escape-Sequenzen ab $FE00. 

Abschließend bleibt noch anzuführen, daß temporär die 
RS232-Ein- und Ausgabepuffer ab $0C00 beziehungs¬ 
weise $0D00 verwendet werden. (J.BIechinger/ah) 


Eingabehinweise zum Programm »/BUTLER.S2000« 

Das Programm ist mit dem MSE im C 64-Modus einzu¬ 
geben und zu speichern. Anschließend muß der CI28 
aus- und wieder eingeschaltet werden. Laden Sie nun 
das Programm mit LOAD "/BUTLER.$2000",8,1 im 
C128-Modus. Ist das geschehen, sind folgende Schritte 
erforderlich: 

1. Mit dem Befehl MONITOR < RETURN > in den ein¬ 
gebauten Monitor springen. 

2. Mit »T 2000 2CEB F000« das Programm »/BUT- 
LER.S2000« nach $F000 schieben. 

3. Mit »S"/BUTLER,2",08,FOOO,FCEB« das Pro¬ 
gramm speichern. 

Wenn Sie die Leserservice-Diskette haben, entfal¬ 
len diese Hinweise. 

Von nun an kann das Programm mit »RUN " BUTLER"« 
geladen und gestartet werden. 
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Name 

/butler.$2000 


2000 2ceb 

22f 8 

a5 

3e 

48 

a9 

00 

85 

3d 

a9 

78 

2608 

5a 

85 

5b 

20 

el 

£0 

84 

5c 

70 











2300 

Oc 

85 

3e 

20 

96 

13 

e6 

43 

87 

2610 

85 

5d 

4c 

ed 

£0 

20 

96 

13 

a5 

2000 

20 

2f 

tl 

4c 

e 2 

02 

48 

eO 

df 

2308 

68 

85 

3e 

68 

85 

3d 

60 

84 

9c 

2618 

c9 

6b 

20 

ed 

£0 

eO 

10 

bO 

14 

2008 

00 

dO 

Oa 

a9 

bl 

8d 

le 

fO 

Oa 

2310 

79 

a5 

26 

dO 

02 

c6 

27 

c6 

80 

2620 

04 

8e 

fd 

03 

60 

4c 

bO 

£0 

58 

2010 

68 

8d 

if 

fO 

60 

a9 

2c 

8d 

44 

2318 

26 

a5 

26 

c5 

24 

a5 

27 

e5 

2b 

2628 

20 

04 

f 6 

8a 

ae 

d5 

03 

85 

Oa 

2018 

le 

£0 

68 

4c 

18 

14 

bl 

00 

3b 

2320 

25 

90 

Oa 

aO 

00 

bl 

26 

a4 

93 

2630 

79 

a9 

5a 

20 

24 

fO 

20 

59 

15 

2020 

60 

4c 

24 

14 

48 

eO 

00 

dO 

5f 

2328 

79 

91 

26 

bO 

e4 

60 

ad 

be 

8f 

2638 

f 5 

bO 

14 

a5 

79 

eO 

00 

fO 

cO 

2028 

0a 

a9 

91 

8d 

3c 

fO 

68 

8d 

25 

2330 

fl 

c9 

02 

bO 

4a 

ad 

bf 

fi 

91 

2640 

Ob 

20 

3c 

fO 

c8 

dO 

fa 

e6 

55 

2030 

3d 

fO 

60 

a9 

2c 

8d 

3c 

fO 

35 

2338 

c9 

11 

bO 

43 

ac 

bd 

fl 

cO 

20 

2648 

5b 

e8 

dO 

f 5 

20 

3c 

£0 

60 

73 

2038 

68 

4c 

30 

14 

91 

00 

60 

4c 

88 

2340 

ii 

bO 

83 

20 

df 

f 2 

90 

3a 

da 

2650 

20 

ee 

f 5 

c4 

5a 

e5 

5b 

bO 

al 

2040 

3c 

14 

a9 

02 

8d 

50 

£0 

ba 

c6 

2348 

c8 

cc 

bd 

fl 

dO 

31 

a5 

Od 

6b 

2658 

09 

ae 

d5 

03 

ac 

fd 

03 

4c 

ed 

2048 

bd 

01 

01 

bc 

02 

01 

38 

e9 

3b 

2350 

e9 

75 

cd 

cf 

15 

a9 

00 

2a 

54 

2660 

96 

f 5 

a5 

5c 

38 

e5 

5a 

aa 

57 

2050 

02 

bO 

05 

88 

90 

02 

aO 

00 

98 

2358 

cd 

be 

fi 

dO 

22 

a5 

Od 

29 

fl 

2668 

a5 

5d 

e5 

5b 

a8 

8a 

18 

65 

ab 

2058 

8d 

69 

£0 

8c 

71 

fO 

60 

20 

c8 

2360 

7 f 

06 

Od 

18 

65 

Od 

a8 

ad 

e5 

2670 

5e 

85 

5e 

98 

65 

5f 

85 

5f 

62 

2060 

7b 

£0 

08 

48 

ad 

78 

fO 

18 

fl 

2368 

dl 

15 

85 

24 

ad 

d3 

15 

85 

83 

2678 

ae 

d5 

03 

ac 

fd 

03 

4c 

c4 

la 

2068 

69 

00 

8d 

78 

fO 

ad 

79 

fO 

88 

2370 

25 

a2 

00 

bd 

bf 

fl 

91 

24 

b8 

2680 

f 5 

20 

ee 

f 5 

ae 

d5 

03 

bd 

21 

2070 

69 

00 

8d 

79 

fO 

68 

28 

ad 

ba 

2378 

e8 

c8 

eO 

03 

90 

£5 

60 

4c 

30 

2688 

10 

13 

ae 

fd 

03 

bc 

10 

13 

Oa 

2078 

77 

fO 

60 

08 

48 

8a 

48 

98 

ac 

2380 

bc 

£0 

a2 

01 

bd 

b4 

fl 

bc 

40 

2690 

85 

24 

84 

25 

20 

59 

£5 

bO 

£3 

2080 

48 

ba 

bd 

07 

01 

bc 

08 

01 

8e 

2388 

b6 

fl 

18 

7d 

bc 

fl 

90 

01 

8c 

2698 

la 

20 

4d 

£5 

8a 

£0 

11 

8a 

5e 

2088 

85 

ce 

84 

cf 

aO 

03 

fe 

07 

bb 

2390 

c8 

48 

dd 

bB 

fi 

98 

48 

fd 

Oc 

26a0 

48 

20 

b4 

f 6 

c8 

dO 

fa 

e6 

dl 

2090 

01 

dO 

03 

fe 

08 

01 

bl 

ce 

87 

2398 

ba 

fl 

90 

03 

4c 

b3 

fO 

ca 

8b 

26a8 

5b 

e6 

5f 

68 

aa 

e8 

dO 

ef 

70 

2098 

99 

76 

£0 

88 

dO 

£0 

68 

a8 

41 

23a0 

10 

e2 

ae 

b5 

fi 

ac 

b7 

fi 

cb 

26b0 

20 

b4 

f 6 

60 

a2 

3f 

e4 

24 

£4 

20a0 

68 

aa 

68 

28 

60 

a9 

2c 

20 

cl 

23a8 

ad 

be 

fi 

dO 

13 

ae 

d6 

15 

77 

26b8 

dO 

Of 

e4 

25 

dO 

Ob 

bl 

5a 

ce 

20a8 

96 

13 

5e 

79 

60 

a2 

Ob 

2c 

2e 

23b0 

8a 

ac 

d8 

15 

18 

6d 

bd 

fl 

31 

26c0 

aa 

bl 

5e 

91 

5a 

8a 

91 

5© 

Oa 

20b0 

a2 

Oe 

2c 

a2 

10 

2c 

a2 

16 

d2 

23b8 

90 

03 

ee 

d8 

15 

8d 

d6 

15 

e4 

26c8 

60 

a9 

5a 

8d 

aa 

02 

8d 

b9 

a9 

20b8 

2c 

a2 

17 

2c 

a2 

19 

20 

96 

21 

23c0 

86 

24 

84 

25 

ae 

b5 

fl 

ac 

d8 

26d0 

02 

a6 

24 

20 

a2 

02 

48 

a9 

el 

20c0 

13 

3c 

4d 

20 

96 

13 

ef 

77 

f 9 

23c8 

b7 

fl 

e8 

dO 

01 

c8 

86 

26 

89 

26d6 

5e 

8d 

aa 

02 

a6 

25 

20 

a2 

41 

20c8 

60 

20 

96 

13 

da 

77 

60 

20 

6b 

23d0 

84 

27 

ac 

bd 

fl 

20 

Of 

£3 

Of 

26 e 0 

02 

a6 

24 

20 

af 

02 

a9 

5e 

bl 

20d0 

96 

13 

15 

88 

60 

20 

96 

13 

ce 

23d8 

38 

88 

b9 

00 

Oc 

90 

03 

09 

26 

26e8 

8d 

b9 

02 

68 

a6 

25 

20 

af 

53 

20d8 

f 7 

87 

60 

20 

96 

13 

12 

88 

Oa 

23e0 

80 

18 

91 

24 

98 

dO 

£2 

09 

43 

26f 0 

02 

60'20 

db 

SO 

84 

5a 

85 

4d 

20 eO 

60 

20 

96 

13 

Of 

88 

60 

20 

4f 

23e8 

80 

88 

91 

24 

ae 

b4 

fl 

ac 

47 

26f 8 

5b 

20 

el 

fO 

84 

5e 

85 

5f 

Oa 

20 e 8 

96 

13 

03 

88 

60 

20 

96 

13 

61 

23f 0 

b6 

fl 

ad 

be 

fi 

dO 

12 

ae 

2d 

2700 

ae 

d5 

03 

bd 

10 

13 

85 

24 

09 

20f 0 

09 

88 

60 

20 

96 

13 

le 

9e 

11 

23f 8 

d2 

15 

8a 

ac 

d4 

15 

18 

69 

b6 

2708 

85 

25 

aO 

00 

fO 

11 

20 

b4 

c9 

20f 8 

60 

20 

96 

13 

f 4 

87 

60 

20 

be 

2400 

03 

90 

03 

ee 

d4 

15 

8d 

d2 

bc 

2710 

£6 

e6 

5a 

dO 

02 

e6 

5b 

a5 

3a 

2100 

96 

13 

d4 

84 

60 

20 

96 

13 

6d 

2408 

15 

86 

24 

84 

25 

ad 

b4 

fl 

70 

2718 

5e 

dO 

02 

c6 

5f 

c6 

5e 

a5 

29 

2108 

c9 

84 

60 

20 

96 

13 

dd 

77 

98 

2410 

ac 

b6 

fl 

85 

26 

84 

27 

aO 

a9 

2720 

5a 

c5 

5e 

a5 

5b 

©5 

5f 

90 

2d 

2110 

60 

20 

96 

13 

7b 

87 

60 

20 

3e 

2418 

03 

20 

Of 

f 3 

88 

b9 

bf 

fi 

a7 

2728 

e5 

60 

20 

db 

fO 

8c 

e4 

f 4 

b2 

2118 

96 

13 

7e 

87 

60 

20 

96 

13 

50 

2420 

91 

24 

98 

dO 

f 7 

68 

8d 

b6 

6a 

2730 

8d 

e5 

f 4 

20 

el 

£0 

8c 

e8 

9b 

2120 

6e 

86 

60 

20 

96 

13 

90 

86 

3f 

2428 

fl 

68 

8d 

b4 

fl 

68 

8d 

b7 

4f 

2738 

f 4 

8d 

e9 

f 4 

20 

el 

£0 

aa 

36 

2128 

60 

20 

96 

13 

e3 

86 

60 

a9 

e8 

2430 

fl 

68 

8d 

b5 

fl 

ae 

be 

fl 

e3 

2740 

98 

18 

6d 

e4 

f4 

8d 

e6 

f 4 

ld 

2130 

00 

aO 

£0 

8d 

5b 

13 

8c 

5c 

a7 

2438 

fe 

cf 

15 

60 

a9 

00 

aO 

fd 

88 

2748 

Sa 

6d 

e5 

f 4 

8d 

e7 

f4 

ae 

ea 

2138 

13 

8d 

12 

12 

8c 

13 

12 

4c 

lb 

2440 

8d 

dl 

15 

8c 

d3 

15 

a9 

00 

19 

2750 

d5 

03 

bd 

10 

13 

85 

24 

85 

ii 

2140 

ae 

fl 

a9 

00 

aO 

fe 

8d 

ea 

5f 

2448 

aO 

la 

8d 

d5 

15 

8c 

d7 

15 

53 

2758 

25 

ac 

e8 

f 4 

ad 

e9 

f 4 

84 

b3 

2148 

14 

8c 

eb 

14 

a9 

00 

8d 

ec 
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Tomado-Copy 1571 


Man nehme: den großen Speicher des C128, 
beschleunige die ohnehin hohe Geschwindigkeit 
der Floppy 1571/1570 und kopiere so eine Disket¬ 
tenseite in nur 75 Sekunden. 

S icherlich haben Sie sich als Besitzer eines C128 schon 
des öfteren darüber geärgert, daß die bisherigen Kopier¬ 
programme für den C64 mindestens drei Durchgänge 
pro Diskettenseite benötigen. Da diese Programme aber im 
C128-Modus nicht lauffähig sind, kann der doppelt große 
Speicher des C128 nicht genutzt werden. Das DOS-Shell auf 
der Test-/Demodiskette nutzt zwar den gesamten Speicher, 
ist aber viel zu langsam. Tornado-Copy 1571 kopiert hinge¬ 
gen eine Diskettenseite in weniger als 75 Sekunden und in 
nur zwei Durchgängen. Diskettenseiten, auf denen mehr als 


184 Blöcke frei sind, werden bei BAM-Auswahl sogar in nur 
einem Durchgang kopiert. 

Geben Sie Tornado-Copy (Listing 1) bitte im C64-Modus 
mit dem MSE ein und speichern das Programm auf Diskette. 
Zum Kopieren laden Sie das Programm im 128er-Modus mit 
DLOAD und starten es mit RUN. Tornado-Copy schaltet dann 
als erstes auf den FAST-Modus und den 80-Zeichen- 
Bildschirm um. Auf dem Bildschirm erscheinen nun eine 
Reihe von Fragen, die Sie zunächst beantworten müssen. 
Sie können wählen zwischen einem Kopiervorgang mit BAM- 
Auswahl, bei dem nur die belegten Blöcke kopiert werden, 
und einem Kopieren aller Disketten blocke einer Seite. Wei¬ 
terhin können Sie die Zieldiskette wahlweise vor dem 
Beschreiben formatieren lassen. 

(Ulrich Textoris/nj) 
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C 128 


ANWENDUNG 


Der C128 geht eigene Wege 


Mit dem Aufbringen eines BOOT-Sektors auf eine 
Diskette kann man den C128 dazu veranlassen, 
bestimmte Programme nach dem Einschalten 
automatisch zu laden und zu starten. Das fol¬ 
gende Programm ermöglicht Ihnen die Herstel¬ 
lung eines solchen BOOT-Sektors. 


W enn man die Floppy-Station und anschließend den 
CI28 einschaltet, dann fällt einem auf, daß das Dis¬ 
kettenlaufwerk anläuft und einen Zugriff durchführen 
will. Ist nun eine Diskette eingelegt, die einen speziellen 
BOOT-Sektor enthält, so wird automatisch ein bestimmtes 
Programm geladen und ausgeführt. Als Beispiel mag CP/M 
dienen. 

Lag keine Diskette im Laufwerk, die einen solchen BOOT- 
Sektor enthält, so erfolgt der Start des Basic 7.0 des C128 
und das Laufwerk hört mit dem Zugriff auf. 

Ein solcher BOOT-Sektor hat einen bestimmten Aufbau 
(Bild 1). Wenn Sie nun gerne Ihre Disketten mit einem solchen 
Sektor versehen wollen, beispielsweise um Programme zu 
laden, ohne auch nur einen Finger zu rühren, dann kommt das 
Programm »Boseco« (Listing 1) gerade recht. Es erlaubt die 
Herstellung eines BOOT-Sektors und das Auf bringen auf eine 
Diskette. Das Wort BOOT-Sektor kommt übrigens vom Basic- 
Befehl BOOT, der anhand eines solchen Sektors Programme 
laden und starten kann. 

Der BOOT-Sektor ist auf jeder Diskette der Sektor 0 auf 
Spur 1. Er enthält eine spezielle Meldung, die während des 
BOOTens ausgegeben wird und dazu noch den Namen des 
Programms, das geladen werden soll. Schließlich ist in dem 
Block auch noch ein Maschinenprogramm enthalten, das 
nach dem Laden alle weiteren Vorgänge steuern soll. 

Das Programm Boseco wird geladen und mit RUN gestar¬ 
tet. Es kann nun der Text eingegeben werden, der während 
des BOOTens auf dem Bildschirm erscheinen soll, zum Bei¬ 
spiel: »Der Rest wird geladen...« 

Anschließend gibt man die Anzahl der Programme an, die 
in den BOOT-Sektor geladen und (wenn er nicht ausreicht) 
auf dem Rest von Spur 1 der Diskette untergebracht werden 
sollen. Jetzt erwartet Boseco noch die Namen der einzelnen 
Programme, wobei die Filenamen angegeben werden müs¬ 
sen, unter denen die Programme auf einer Diskette gespei¬ 
chert sind. 


Nach der Angabe jedes Namens sind außerdem wichtige 
Daten über die einzelnen Maschinenprogramme an Boseco 
zu übergeben. Das ist zuerst einmal die Startadresse des ent¬ 
sprechenden Maschinenprogramms im Speicher des Com¬ 
puters. Diese ist dezimal anzugeben. Danach benötigt 
Boseco noch die Länge des jeweiligen Programms in Bytes 
- ebenfalls dezimal. 

Sind diese Eingaben abgeschlossen, so sind den Auffor¬ 
derungen entsprechend die Disketten mit den erforderlichen 
Maschinenprogrammen einzulegen, wobei mit < RETURN > 
quittiert wird. Boseco lädt dabei die einzelnen Programme in 
den Speicher, um sie anschließend auf dem BOOT-Sektor 
unterzubringen und diesen auf eine beliebige, formatierte 
Diskette zu schreiben. 


Aufbau eines Boot-Sektors 


un 


Byte: 

Bedeutung 

$00 - $02 

Identifizierung als Boot-Sektor (CBM) 

$03 - $04 

Adresse, ab der die Fölgesektoren ein¬ 
gelesen werden. 

$05 

Bank, in die die Fölgesektoren eingele¬ 
sen werden. 

$06 

Anzahl der Folgesektoren. 

$07 bis Ende- 

Text, der beim Booten auf dem Bild- 

nnung ($00) 

schirm erscheint 

bis Ende- 

Dateinamen eines Programmes, das 

kennung ($00) 

nachgeladen werden soll. 

bis Byte $FF 

Maschinenprogramm 


Bild 1. So ist ein BOOT-Sektor aufgebaut 

Achtung: Es empfiehlt sich, BOOT-Sektoren nur auf leere 
Disketten zu schreiben und erst anschließend Programme 
auf diese Disketten zu speichern, da unter Umständen ein 
BOOT-Sektor-Bereich schon belegt sein kann. Läßt sich das 
nachträgliche Aufbringen eines BOOT-Sektors nicht vermei¬ 
den, so sollte man sich vor dem Start von Boseco vergewis¬ 
sern, daß die Spur 1 der Zieldiskette noch leer ist. 

(O. Mangold/ks) 


lOO rem" boot Sektor constructor 
110 : 

120 rem" by oliver mangold, laichingen 
130 rem" dez. 1985 
140 : 

150 1=0:i=0:bl=0:t$="":x=0:y=0:le=0:11=0:a*=" 
:a=0:t=0:sl=0:hi=0:lo=0:pl=0:an=0 
160 goto 500 
170 : 

180 rem" eingaberoutine 
190 : 

200 t$="": char,x,y:foril=ltole:print".";:next 
210 char,x,y,“" 

220 : 

230 poke 2598,0:poke 2599,0 
240 getkeya* 

250 a=asc(a$) 

260 if a=13 then print".:poke 2599,1:return 
270 if a=20 or a=157 then 370 
280 if a>90 and a<l93 then 230 
290 if a<32 or a>218 then 230 


300 t*=t*+a$:printa* 5 :le=le-l:x=x+l 
310 if 1e>0 then 230 

320 getaS:ifa*=chr*(13) then print" ";:poke 25 
99,l:return 

330 if a*=chr*(20> or a$=chr*<157) then 370 
340 goto 320 
350 : 

360 : 

370 poke 2599,1 

380 if len(t*)=0 then 230 

390 if le=0 then print" ";:goto 410 

400 print 

410 le=le+l:x=x-l 

420 t*=left*(t*,len<t»)-l) 

430 char,x,y,"." 

440 char,x,y 
450 : 

460 goto 230 
470 :' 

Listing 1. Das Programm »Boseco« 
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ANWENDUNG 


C 128 


480 rem“ Start hauprogramm 
490 : 

500 dim bX(110,256> 

510 s 

520 scnclr 

530 char,15,2,ehr*(18):print“ BoSeCo "schr*(14 
6) 

540 char,3,5,“Ein Programm zum Erstellen von” 
550 char,3,7,"Boot — Sektoren." 

560 char,3,10,"(w) by Oliver Mangold“ 

570 char,10,11,"Hagsbucherweg 20" 

580 char,10,12,"7903 Laichingen" 

590 char,10,13,"Tel.07333/4260 

600 char,10,23,"Bitte Taste drucken." 

610 getkeya* 

620 : 

630 rem" block 1/0 init 
640 : 

650 bl=1 : restore 1820 
660 fori=l to 6 : read bX(bl,i> snext 
670 fori=l to 13 : read bX(bl,67+i> : next 
680 : 

690 rem" 1. folgeblock init 
700 : 

710 bl=2 : restore 1870 

720 fori=l to 69 : read bX<bl,31+i) : next 
730 : 

740 scnclr 

750 char,3,3,"Bitte geben Sie den Text, der" 
760 char,3,5,"beim Booten angezeigt werden“ 

770 char,3,7,"soll, ein." 

780 : 

790 char,1,10,"Text s":y=12rx=l:le=38:gosub 20 
0 

800 : 

810 rem" text in block 1/0 schreiben und rest 
mit space auff J llen 
820 : 

830 bl = l: t*=chr* ( i3> +chr* (14) +chr* (150)+t* 

840 l=len(t*) 

850 fori=lto 1 :bX(bl,7+i>=asc(mid*(t*,i,1>> : 
next 

860 if 1=41 then 890 

870 -fori =1+8 to 48 : bX(bl,i)=32 : next 
880 bX(bl,49)=13 
390 : 

900 bX(bl ,51) =0:-fori=52 to 67: bX (bl ,i ) =234: nex 
t 

910 : 

920 scnclr 
930 : 

940 an=0 
950 : 

960 rem" prg-name und ladeadressen einiesen 
970 : 

980 scnclr 

990 char,3,1,"Bitte geben Sie nun Programm-" 
1000 char,3,3,"namen, Ladeadresse und L. nge an 

1010 char,0,6:y=5 
1020 if an=5 then 1190 

1030 print" Name Prg.";:printan+1;":":x=17:y 

=y+1:1e=16:gosub200 

1040 if t*="" then 1190 

1050 an=an+l 

1060 na*(an)=t* 

1070 : 

1080 print:print" Ladeadresse :“:x=17:y=y+l: 
le=5:gosub200 

1090 t=val(t*):nh(an)=int(t/256):nl(an)=t-256* 
nh(an) 

1100 print:print“ L. nge : ”;:x=17:y=y+ 

1:1e=5:gosub 200 
1110 la(an)=val(t*) 

1120 : 

1130 y=y+l 
1140 print:print 
1150 goto 1020 
1160 : 

1170 rem"programme einiesen und in folgebl'cke 
schreiben 
1180 : 

1190 scnclr:bX(2,1)=an:bl=2:pl=lpl:sl=0 
1200 char,3,3,"Programme einiesen." 


1210 k=6 

1220 fori= 1 to an 

1230 char,2,k,"Diskette -Fr ":print na*(i) 

1240 char,2,k+2,"einlegen und Return dr J cken.“ 
1250 k=k+4 
1260 : 

1270 sl=sl+la(i—1):lo=8308+sl:hi=int(lo/256>:1 
o=lo—256*hi 

1280 bX(2,6+i)=hi : bX(2,l+i)=lo 

1290 getkeya*: if a*Ochr*(13) then 1290 

1300 dopenttl,(na*(i)) 

1310 : 

1320 get#l,a*:get#l,a* 

1330 forj= 1 to lad) 

1340 get#l,a*:if a*=""thena*=chr*(0) 

1350 bX(bl,pl)=asc(a*) 

1360 pl=pl+l:if p1=257 then pl=l:bl=bl+l 
1370 nextj , 

1380 : 

1390 bX (2,16+i ) =int (la (i ) /256) : bX (2,1 l'+i ) =la (i 
)-256*bX(2,16+i) 

1400 bX(2,21+i)=nl(i):bX(2,26+i)=nh(i> 

1410 : 

1420 dclose#l 
1430 next i 
1440 : 

1450 rem" jsr aufrufe in block 1 integrieren 
1460 : 

1470 fori= 0 to an—1 

1480 bX(1,i*3+81)=32 : rem" jsr 

1490 bX(1,i*3+82)=bX(2,22+i) : rem“ lo-byte 

1500 bX(1,i*3+83)=bX(2,27+i> : rem" hi-byte 

1510 next 

1520 bX(1,i*3+81)=76:bX(1,i*3+82)=3:bX(1,i*3+B 
3) =64 
1530 : 

1540 rem" anzahl der nachzuladenden bl’cke in 
block 1 schreiben 
1550 : 

1560 bX(1,7)=bl—1 
1570 : 

1580 em" boot-sektoren auf disk schreiben 
1590 : 

1600 scnclr:char,5,10,“Bitte Diskette Fr Boot 
-Sektor “ 

1610 char,5,12,"einlegen .“ 

1620 char ,5,14, "Dann Taste dr-'cken." 

1630 getkeya* 

1640 t=l:s=0 

1650 open 15,8,15:open 2,8,2,"#" 

1660 fori=ltobl 

1670 print#15,"b-p 2 0" 

1680 forj=lto256:print#2,chr* (bX (i,j> >;:next 

1690 print#15,“u2 2 0“;t;s 

1700 print#15,“b-a 0";t;s 

1710 s=s+l:if s=21 then t=t+l:s=0 

1720 next 

1730 : 

1740 close2:closel5 
1750 char,5,20,ds* 

1760 char,5,22,"Nochmal ...?" 

1770 x=18:y=22:le=l:gosub200 
1780 if t*<>"j" then end 
1790 goto 1600 

1800 rem" datas f J r kenncode,bootprogramm etc. 
1810 : 

1820 data 67,66,77 
1830 data 16,32,0 
1840 : 

1850 data 169,80,141,0,10,169,11,141,1,10,32,4 
7,32 
1860 : 

1870 data 206,16,32,48,63,173,16,32,168,185,17 
,32,133,142,185,22,32,133,143 

1880 data 185,32,32,170,185,37,32,133,158,185, 
42,32,133,159,224,0,48,22,160,0 
1890 data 177,142,145,158,136,208,249,230,143, 
230,159,202,48,12,208 

1900 data 240,173,16,32,168,185,27,32,16B,208, 

230,76,47,32,96 

1910 : 


Listing 1. Das Programm »Boseco« (Schluß) 
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C 128 


GRAFIK 


»Zeidienselzereien« 
auf dem CI28 


Mit »Zeichen-Fix« läßt sich der Zeichensatz des 
C128 beliebig ändern. Somit sind internationale 
Zeichen kein Problem mehr. Die Tasten können 
wie bei professionellen Spielprogrammen mit 
kleinen Grafiken belegt werden, die dann später 
zusammen eine große Grafik ergeben. 

B ei dem Programm »Zeichen-Fix« handelt es sich um 
einen Zeichensatz-Generator für den C128. Mit diesem 
Programm ist es möglich, neben dem Zeichensatz des 
Computers auch eigene Zeichen zu kreieren, um damit ent¬ 
weder Sonderzeichen oder Grafiken behandeln zu können. 

Nach dem Start von Zeichen-Fix muß man 15 Sekunden 
warten, bis der Original-Zeichensatz ins RAM (Startadresse: 
8192) kopiert worden ist. Im Hauptmenü sind anschließend 
folgende Optionen verfügbar: 

1. Zeichen verändern 

Dies ist der wichtigste Teil des Programms. Hier können die 
neuen Zeichen erstellt werden. 

Man wird aufgefordert das Zeichen einzutippen, das verän¬ 
dert werden soll (auch SHIFT-Kombinationen sind möglich). 
Daraufhin erscheint das Zeichen in einer 8x8-Matrix. Mit der 
<CLR/HOME>-Taste wird der Cursor in die linke obere 
Ecke gesetzt. Mit <SHIFT+CLR/HOME> wird die Matrix 
gelöscht. Beim Drücken von < I > wird die Matrix invertiert. 
Die <D>-Taste dreht das Zeichen um 180 Grad. Bewegt 
wird der Cursor mit den Cursor-Tasten. Punkte werden nach 
Druck auf die < * >-Taste gesetzt, gelöscht werden sie mit 
der Leertaste. Um ins Hauptmenü zu kommen, muß die Taste 
< — > gedrückt werden. Ist ein Zeichen fertiggestellt, muß 
es mit der < RETURN > -Taste in den neuen Zeichensatz auf¬ 
genommen werden. 

Eine Übersicht dieser Befehle finden Sie auch auf dem 
Bildschirm links neben der Matrix. 

2. Zeichensatz speichern 

Unter diesem Menüpunkt können fertige Zeichensätze auf 
Diskette gespeichert werden. Ein Zeichensatz belegt neun 
Blöcke auf der Diskette. 

3. Zeichensatz laden 

Das Laden von Zeichensätzen ist mit diesem Menüpunkt 
möglich. Der Zeichensatz kann dann weiter bearbeitet oder 
mit Menüpunkt 4 aktiviert werden. 

4. Zeichensatz aktivieren 

Der erstellte Zeichensatz wird aktiviert, das heißt gestartet, 
und das Programm verlassen. Vorher wird die 
<RESTORE> -Taste außer Funktion gesetzt, weil nach 
Drücken von < RUN/STOP+RESTORE> ansonsten der 
Original-Zeichensatz aktiviert würde. 

Die <RESTORE>-Taste kann mit POKE 792,64 wieder 
eingeschaltet werden. 

5. Directory 

Bei dieser Funktion wird das Directory der eingelegten Dis¬ 
kette auf den Bildschirm gebracht. Mit einem Tastendruck 
kommt man wieder ins Hauptmenü. 

6. Ende 

Das Programm wird beendet. 

Erstellte Zeichensätze können auch ohne Zeichen-Fix ver¬ 
wendet werden: 

Zuerst muß man die Grafikseite mit GRAPHIC 1,1 :GRAPHIC 
0 löschen. Danach ist der Zeichensatz mit BLOAD- 


" NAME " ,ON B0,P8192 zu laden. Aktiviert wird er mit POKE 
2604, (PEEK(2604) AND 240) OR 8. Ein Deaktivieren ist mit 
POKE 2604, (PEEK(2604) AND 240) OR 4 möglich. 

Beim Abtippen des Programms (Listing 1) ist zu beachten, 
daß in der Zeile 550 die Grafikzeichen einzusetzen sind, die 
mit <CBM+Y> erreicht und in der Zeile 460 die, die mit 
<CBM + P> erreicht werden. 

In den Zeilen 470 bis 540 müssen jeweils die zweiten Gra¬ 
fikzeichen mit < CBM + N > und die dritten Grafikzeichen mit 
<CBM+H> eingetippt werden. Außerdem sollte man dar¬ 
auf achten, daß in Programmen, in denen der neue Zeichen¬ 
satz benutzt wird, nicht zusätzlich hochauflösende Grafik 
verwendet wird, da beim Löschen des Grafikspeichers auch 
der Zeichensatz gelöscht wird. 

Programmbeschreibung: 

In den Zeilen 80 bis 160 wird der Original-Zeichensatz ins 
RAM kopiert. 

Die Zeilen 170 bis 690 erstellen das Hauptmenü und die 
Matrix zum Erstellen von Zeichen. Außerdem wird in der Zeile 
370 festgelegt, wohin je nach Wahl aus dem Hauptmenü 
gesprungen werden soll. 

Die Zeilen 700 bis 790 holen das vorher gewählte Zeichen 
in die Matrix. 

Ab der Zeile 800 beginnt dann die Routine zum Verändern 
der Zeichen. 

In de- Zeilen 810 bis 940 erfolgt die Abfrage, in welches 
Unterprogramm, je nach Tastendruck, gesprungen werden 
soll. 

Die Zeilen 890 bis 1230 übernehmen die Steuerung des 
Cursors. 

Ab 1240 folgen dann Sonderfunktionen, wie Punkte set¬ 
zen und löschen, Cursor in die obere linke Ecke (HOME), 
Matrix löschen (CLR), Matrix invertieren, Zeichen in Zeichen¬ 
satz übernehmen (RETURN), ins Hauptmenü wechseln ( —) 
und Zeichen drehen. 

Danach folgen in den Zeilen 2100 bis 2200 die Disketten¬ 
funktionen Laden und Speichern und von 2210 bis 2240 die 
Aktivierungsroutine für die Zeichensätze. 

Zum Schluß folgt ab 2250 eine Fehlerabfang-Routine. Die¬ 
se Routine fängt alle Fehler, auch Diskettenfehler, ab. 

(D. Koller/ks) 


10 REM ******************************** 

20 REM ***** ZEICHEN-FIX ***** 

30 REM ***** FUER DEN PC 128 ***** 

40 REM ***** VON DIRK KOLLER ***** 

50 REM ***** 6305 BUSECK 1 ***** 

60 REM ******************************** 

70 MA=8192: M0=5324B: ADR=1533 

80 REM *** ZEICHEN I. RAM KOPIEREN *** 

90 GRAPHIC 1,1 

100 GRAPHIC 0 

110 FAST 

120 BANK 14 

130 FOR I=.T0 2048 

140 POKE(MA+1>,PEEK CMO+1) 

150 NEXT 
160 SLOW 

170 REM *** HAUPTMENU **************** 

ISO TRAP 2250 

190 COLOR 0,16: COLOR 4,16: COLOR 5,1 
200 3CNCLR 

Listing 1. Der »Zeichen-Fix«-Editor für den C128 
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C 128 

GRAFIK 1 


210 CHAR 1,10,2," 

900 IF OPS="{RIGHTJ" THEN GOSUB 950 

220 CHAR 1,J.0,3,"E<20SPACE}R" 

910 IF OPS="CLEFTJ“ THEN GOSUB 1030 

230 CHAR 1,10,4,"^ ZEICHEN-FIX PC 128 H" 

920 IF 0PS="1UP>" THEN GOSUB 1100 

240 CHAR 1,10,5,"E<2SPACE:VON DIRK KOLLEROSPACE 

930 IF OPS="<DOWN>" THEN GOSUB 1170 

ITT 

940 GOTD 830 

250 CHAR 1,10,6,"E<20SPACE>W 

950 REM *** CURSOR RECHTS ************ 

260 CHAR 1,10 f 7, "TTTTTTTTTTTTTTTHTTTTT" 

960 IF PEEK <ADR+1)=116 OR PEEKCADR+1>=101 THEN R 

270 CHAR 1,7,10,"1 : NEUE ZEICHEN ERSTELLEN" 

ETURN 

280 CHAR 1,7,12,"2 : ZEICHENSATZ ABSPEICHERN" 

970 POKE ADR,AZEI 

290 CHAR 1,7,14,"3 : ZEICHENSATZ LADEN" 

980 ADR=ADR+1 

300 CHAR 1,7,16,"4 : ZEICHENSATZ AKTIVIEREN" 

990 AZEI=PEEK(ADR) 

310 CHAR 1,7,18,"5 : DIRECTORY" 

1000 POKE ADR,81 

320 CHAR 1,7,20,"6 : ENDE" 

1010 RETURN 

330 GET KEY NUS 

1020 POKE ADR,81 

340 NU=VAL(NUS> 

1030 REM *** CURSOR LINKS ************ 

350 IF NU<1 OR NU>6 THEN PRINT CHR*<?>: GOTO 170 

1040 IF PEEK(ADR-l)=103 OR PEEK(ADR-l)=106 THEN 

360 IF NU=6 THEN END 

RETURN 

370 ON NU GOTO 380,2100,2160,2210,2320 

1050 POKE ADR,AZEI 

380 REM *** NEUE ZEICHEN ERSTELLEN **** 

1060 ADR=ADR—1 

390 SCNCLR 

1070 AZEI=PEEK(ADR) 

400 CHAR 1,10,3,“ZEICHEN ERSTELLEN" 

1080 POKE ADR,81 

410 CHAR 1,10,4,"TTTTTTTTTTTITT!TT" 

1090 RETURN 

420 CHAR 1,0,7,"BEFEHLE:" 

1100 REM *** CURSOR HOCH ************* 

430 CHAR 1,0,B,"TtTTTTT" 

1110 IF PEEK(ADR-40)=111 THEN RETURN 

440 CHAR 1,0,9,"-HOME :CURSOR LINKS OBENOSPACE> 

1120 POKE ADR,AZEI 

Tf-tl OSPACE >" 

1130 ADR=ADR—40 

450 CHAR 1,0,10,"-CLRT2SPACE>:LOESCHT MATRIX16SP 

1140 AZEI=PE£K(ADR) 

ACEJTT MATRIX: " 

1150 POKE ADR,81 

460 CHAR 1,0,11,"-I<4SPACE>:INVERTIERT MATRIX t3S 

1160 RETURN 

PACE>'k* ppppTpW" 

1170 REM *** CURSOR RUNTER *********** 

470 CHAR 1,0,12,"-DC4SPACE>:DREHT ZEICHEN OSPACE 

11B0 IF PEEK(ADR+40)=119 THEN RETURN 

ITSKSSPACEIH" 

1190 POKE ADR,AZEI 

480 CHAR 1,0,13,"-*<4SPACE>:PUNKT SETZEN{8SPACE> 

1200 ADR=ADR+40 

TCff {3SPACE >U" 

1210 AZEI=PEEK(ADR) 

490 CHAR 1,0, 14, "-SPACE: PUNKT LOESCHENOSPACEIlTil 

1220 POKE ADR,81 

T8SPACEIH" 

1230 RETURN 

500 CHAR 1,0,15,"-PFEILTASTEN BEWEGEN.DENOSPACE 

1240 REM *** PUNKT SETZEN/LDESCHEN *** 

I K-RX3SPACEI-H" 

1250 IF OPS="*" THEN AZEI=42 

510 CHAR 1,0,16," CURSOR UEBER DIE MATRIXOSPACE 

1260 IF OPS=" " THEN AZEI=32 

J’RTKBSPACEJ'ff" 

1270 GOTO 830 

520 CHAR 1,0,17,"-RETURN:SICHERT ZEICHENC4SPACE> 

1280 REM *** CLR, HOME, I St D ********** 

'kTJ'.8SPACE>F 

530 CHAR 1,0,18,"—*-I4SPACE}:ZURUECK INS MENU{4SP 

i 4?y - Uh* {.HUnt} THEN GQoUB 1340 

1300 I? OP$=• , ':CLR> ,, THEN GOSUB 1400 

ACEJTOCaSPACEJR" 

1310 IF OPS="I" THEN GOSUB 1520 

540 CHAR 1,27,19,"1<1718SPACE>R" 

1320 IF OPS="D" THEN GOSUB 1900 

550 CHAR 1,27,20," OSPACEJYYWYYYV " 

1330 GOTO 830 

560 CHAR 1,0,21,"YyYYVYYYyVYYyYyYyYYYYYYYYyYy"YYY 

1340 REM *** HOME ******************** 

WyWTVY" 

1350 POKE ADR,AZEI 

570 CHAR 1,5,23,"WELCHES ZEICHEN SOLL VERAENDERT 

1360 ADR=1533 

“.1 

1370 AZEI=PEEK(ADR) 

580 CHAR 1,5,24,“WERDEN ? ",1 

1380 PDKE ADR,81 

590 GET KEY AS 

1390 RETURN 

600 TE=ASC(AS) 

1400 REM *** CLEAR ******************* 

610 IF TE<33 OR TE>255 THEN PRINT "1UP>" CHRS(7) 

1410 CHAR 1,10,23,"EINEN MOMENT BI.TTE ..." 

: GOTO 570 

1420 FOR ZEI =0 TO 7 

620 IF TE<160 AND TE>127 THEN PRINT "CUP>" CHRS( 

1430 FOR SPA =0 TO 7 

7): GOTO 570 

1440 CHAR 1,29+SPA,12+ZEI," » 

630 PRINT AS; 

1450 NEXT SPA 

640 CHAR 1,5,23," 08SPACE}." 

1460 NEXT ZEI 

650 CHAR 1,5,24,"{12SPACE>" 

1470 ADR=1533 

660 IF TE AND 128 THEN C0=TE AND 127 OR 64: GOTO 

1480 AZEI=PEEK(ADR) 

700 

1490 POKE ADR,81 

670 IF NOT TE AND 64 THEN C0=TE: GOTO 700 

1500 CHAR 1,10,23,"138SPACE >" 

680 IF TE AND 32 THEN C0=TE AND 95: GOTO 700 

1510 RETURN 

690 C0=TE AND 63 

1520 REM *** MATRIX INVERTIEREN ****** 

700 REM *** ZEICHEN IN MATRIX ******** 

1530 CHAR 1,10,23,"EINEN MOMENT BITTE ..." 

710 AS=MA+C0*8 

1540 POKE ADR,AZEI 

720 FOR Z=0 TO 7 

1550 FOR 1=0 TO'7 

730 FOR S=0 TO 7 

1560 FOR B=0 TO 7 

740 BY=PEEK(AS+Z> AND 2t(7-S) 

1570 INV=1533+(B+(I*40>) 

750 ZES=" “ 

1580 IF PEEK(INV)=42 THEN POKE INV.32: GOTO 1600 

760 IF BY< >0 THEN ZES="*" 

1590 IF PEEK(INV)=32 THEN POKE INV.42 

770 CHAR 1,29+S,12+Z,ZES 

1600 NEXT B 

780 NEXT S 

1610 NEXT I 

790 NEXT Z 

1620 ADR=1533 

800 REM *** ZEICHEN VERAENDERN ******* 

1630 AZEI=PEEK(ADR) 

810 AZEI=PEEK(ADR) 

1640 POKE ADR,81 

820 POKE ADR,81 

1650 CHAR 1,10,23,"I38SPACE1" 

830 GET KEY OPS 

1660 RETURN 

840 IF 0PS="tRIGHTI" OR 0PS="ILEFTJ" OR 0PS="IUP 

1670 REM *** RETURN S< * ************** 

J" OR OPS="tDOWN>" THEN 890 

1680 IF 0PS=CHRS(13> THEN GOSUB 1710 

850 IF 0P$=“CH0ME>" OR 0FS="{CLR>" OR 0PS="I“ OR 

1690 IF 0P*="«-" THEN 170 

OPS="D“ THEN 1280 

1700 GOTO 830 

860 IF 0PS=CHRS (13) OR 0PS="*-" THEN 1670 

1710 REM *** ZEICHEN IN RAM POKEN **** 

870 IF 0PS=“*" OR 0PS=" " THEN 1240 

1720 FOR LO=0 TO 7: WE(LD>=0: NEXT LO 

880 PRINT CHRS (7) " -CUP J " : GOTO 830 


890 REM *** CURSOR BEWEGEN *********** 

Listing 1. Der »Zeichen-Fix«-Editor für den C128 (Forts.) 
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C 128 


1730 CHAR 1,10,23,"EINEN MOMENT BITTE ..." 

1740 POKE ADR,AZEI 
1750 FOR 1=0 TO 7 
1760 FOR B=0 TO 7 
1770 INV=1533+(B+(I*40)) 

1780 IF PEEK(INV)=42 THEN WE(I>=WE(I>+(128/(2TB) 

1790 NEXT B 

1800 NEXT I 

1810 P0=MA+C0*8 

1820 FOR 1=0 TO 7 

1B30 POKE PO+I,WE(I> 

1840 NEXT I 

1850 ADR=1533 

1860 AZEI=PEEK <ADR) 

1870 POKE ADR,Bl 

1880 CHAR 1,10,23, "{38SPACEV 

1890 RETURN 

1900 REM *** ZEICHEN DREHEN ********** 

1910 CHAR 1,10,23,"EINEN MOMENT BITTE ..." 

1920 FOR 1=0 TO 7: WE(I)=0: NEXT I 

1930 POKE ADR,AZEI 

1940 FOR 1=0 TO 7 

1950 FOR B=0 TO 7 

1960 INV=1533+(B+(I*40)> 

1970 IF PEEK(INV)=42 THEN WE(I)=WE(I>+(128/(2TB) 
) 

1980 NEXT B 
1990 NEXT I 

2000 AUSH=WE(0): WE(0)=WE(7): WE(7)=AUSH 
2010 AUSH=WE(1>: WE(1)=WE(6): WE( 6 )=AUSH 
2020 AUSH=WE(2): WE(2)=WE(5>: WE(5)=AUSH 
2030 AUSH=WE(3): WE(3)=WE(4): WE(4)=AUSH 
2040 P0=MA+C0*8 
2050 FOR 1=0 TO 7 
2060 POKE PO+I,WE(I) 


207O NEXT I 

2080 CHAR 1,10,23,"(3BSPACE>" 

2090 SOTO 700 

2100 REM *** ZEICHENSATZ SPEICHERN *** 

2110 CHAR 1,0,22,"NAME DES ZEICHENSATZESC6SPACE1 

2120 INPUT " <5LEFTJ";NA® 

2130 BSAVE(NAS),ON B0,P8192 TO P10240 
2140 CHAR 1,0,22,"<38SPACE>“ 

2150 BOTO 170 

2160 REM *** ZEICHENSATZ LADEN ******* 

2170 CHAR 1,0,22,"NAME DES ZEICHENSATZES " 

2180 INPUT "I 6 SPACE,7LEFT >"5 NA* 

2190 BLOAD(NA*>,ON B0.P8192 
2200 GOTO 170 

2210 REM *** ZEICHENSATZ AKTIVIEREN ** 

2220 POKE 792,98 

2230 POKE 2604,(PEEK(2604) AND 240) OR 8 
2240 END 
2250 V=ER 
2260 V*=ERR*(V) 

2270 CHAR 1,0,22,"I38SPACE >" 

2280 CHAR 1,5,22,V* 

2290 CHAR 1,0,23,"C5SPACEIFEHLER BEHEBEN - TASTE 
DRUECKEN" 

2300. GET KEY WA* 

2310 RESUME 170 

2320 REM *** DIRECTORY *************** 

2330 SCNCLR 
2340 CATALOG 
2350 GET KEY DU* 

2360 GOTO 170 


Listing 1. Der »Zeichen-Fix«-Editor für den C128 (Schluß) 


Centronics- Schnittstelle 
für den C128 


Wir machen kurzen Prozeß mit den Anschlußpro¬ 
blemen Ihres Druckers! Mit einem leicht herstell¬ 
baren Kabel und unserem Programm können Sie 
mit nahezu allen Druckern problemlos am C128 
arbeiten. 

D er C128 besitzt mit dem Basic 7.0 einen recht umfang¬ 
reichen Befehlswortschatz, der auch die hochauflö¬ 
sende Grafikprogrammierung unterstützt. Doch was 
nützt die schönste Grafik auf dem Bildschirm, wenn man sie 
nicht auch auf einem Drucker ausgeben kann? Wenn Sie 
einen Drucker mit Centronics-Schnittstelle besitzen, gehö¬ 
ren Sie zu den Menschen, die dieses Problem nicht länger 
betrifft. Der abgedruckte Druckertreiber enthält eine Routine 
zur Umwandlung von CBM-ASCII nach Standard-ASCII, so 
daß im Textmodus nun weiterhin auch die deutschen Umlaute 
wie jedes andere Zeichen verwendet und ausgedruckt wer¬ 
den können. CBM-Sonder- und Grafikzeichen können je¬ 
doch nicht auf dem Drucker realisiert werden. Es ist deshalb 
ratsam, derartige Zeichen in eigenen Listings als CHR$(Zei- 
chen) darzustellen. 

Der Centronics-Druckertreiber für den C128 (Listing 1) 
liegt im freien RAM-Bereich von $1300 bis $17E3 und wird 
mit SYS 4864 aktiviert. Hierbei wird die Betriebssystemrou¬ 
tine zur Ausgabe von Zeichen auf den Treiber umgelenkt. 
Nach < RUN/STOP + RESTORE> oder einem Reset muß 
das Programm erneut aktiviert werden. 


Das Treiberprogramm wird über die Sekundäradresse 
gesteuert. Bei Sekundäradresse Null wird der Text ohne 
ASCII-Wandlung ausgegeben; bei Sekundäradresse 1 bis 14 
erfolgt eine Zeichensatzanpassung über eine 256 Byte 
lange Tabelle ($142a bis $1529), die auch nach eigenen 
Bedürfnissen angepaßt werden kann. Die Sekundäradresse 
15 ist reserviert für die Ausgabe einer hochauflösenden Gra¬ 
fik. Durch Übertragung der Ziffern 1 oder 2 kann die Größe 
der Hardcopy bestimmt werden (siehe Beispiel-Listing 2 und 
Bild 1). Die größtmögliche Hardcopy (Ziffer 2) entspricht 
ungefähr DIN A5. Durch mehrstellige Ziffern kann die Hard¬ 
copy beliebig oft wiederholt werden. Vor jeder Hardcopy wird 
zur Druckjustage eine Leerzeile gedruckt. 

Anpassungen 


Abhängig vom Drucker oder der individuellen Anforderung 
des Benutzers, können einige Voreinstellungen des Treibers 
durch Modifikation, zum Beispiel mit dem eingebauten 
Maschinensprachemonitor, geändert werden. Die entspre¬ 
chenden Speicherstellen und die Bedeutung der voreinge¬ 
stellten Inhalte sind nachfolgend beschrieben. 
Speicherstelle $1303 (dezimal 4867): 

In dieser Speicherstelle ist die Gerätenummer abgelegt. 
Der Ursprungswert ist #4. Soll ein Drucker mit der Geräte¬ 
nummer # 5 angesprochen werden, so muß der Inhalt dieser 
Adresse entsprechend geändert werden. 
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C 128 


GRAFIK 


Test der kleinen Hardcopy 


Bild 1. Mit Listing 2 können 
diese beiden Hardcopies 
erstellt und ausgedruckt 
werden 


Test der grossen Hardcopy 




Speicherstelle $1304 (dezimal 4868) 

Durch den Inhalt dieser Speichersteile wird festgelegt, ob 
am Zeilenende Carriage Return (CR = Wagenrücklauf) 
gesendet wird (Inhalt = 0) oder Carriage Return mit Line 
Feed (LF = Zeilenvorschub) (Inhalt = 1). Voreingestellt ist CR 
und LF. 

Speicherstellen $142a bis $1529 (dezimal 5162 bis 5417) 

In diesem Speicherbereich befindet sich die Umwandlungs- 
tabelle für die Anpassung von CBM-ASCII nach Standard- 
ASCII. Die hier aufgeführten Werte werden bei Sekundär¬ 
adresse ungleich Null anstelle der üblichen Codes an den 
Drucker gesendet. Zur Darstellung der Umlaute auf einem 
Epson-Drucker müssen die Codes über diese Tabelle gewan¬ 


delt werden. Die richtigen Codes sind hierin bereits enthal¬ 
ten. 

Speicherstellen $1540 bis $1544 (dezimal 5440 bis 5444) 

Hier befindet sich die für Initialisierung der kleineren 
Standard-Hardcopy wichtige Escape-Sequenz: 

1b 2a 04 40 01 (27, 4, <320, >320) 

Speicherstellen $1546 bis $154A (dezimal 5446 bis 5450) 
In diesem Bereich ist die entsprechende Escape-Sequenz 
für die vergrößerte Hardcopy-Routine enthalten: 

1b 2a 06 80 02 (27, 6, <640, >640) 

Speicherstelle $156f (dezimal 5487) 

In diesem Register ist der Randabstand für die Standard- 
Hardcopy enthalten (Voreinstellung #20). 
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C 128 


Name druckertr. 128 1300 17e4 


1300 

: 

4c 

05 

13 

04 

01 

a2 

71 

Be 

lc 

iSos 


1 a 

03 

a2 

13 

Be 

lb 

03 

a2 

c2 

1310 

: 

a3 

8e 

lc 

03 

a2 

13 

Be 

ld 

99 

1318 


03 

a2 

bc 

Be 

le 

03 

a2 

13 

18 

1320 

: 

Be 

lf 

03 

a2 

d4 

Be 

20 

03 

9b 

1328 

3 

a2 

13 

Be 

21 

03 

a2 

ec 

Be 

32 

1330 

: 

26 

03 

a2 

13 

Be 

27 

03 

7B 

02 

1338 


a9 

ff 

Bd 

03 

dd 

ad 

02 

dd 

b4 

1340 

: 

09 

04 

8d 

02 

dd 

ad 

00 

dd 

f 6 

1348 

: 

09 

04 

8d 

00 

dd 

a9 

10 

Bd 

3d 

1350 

: 

Od 

dd 

ad 

Od 

dd 

58 

60 

48 

Oc 

1358 

3 

Bd 

01 

dd 

ad 

00 

dd 

29 

fb 

le 

1360 

8 

Bd 

00 

dd 

09 

04 

Bd 

00 

dd 

ee 

1368 

3 

ad 

Od 

dd 

29 

10 

fO 

f 9 

68 

7a 

1370 

: 

60 

a6 

bB 

20 

02 

f 2 

dO 

03 

56 

1378 

3 

4c 

7f 

f 6 

a6 

93 

eO 

Oa 

90 

fO 

1380 

3 

03 

4c 

7c 

f 6 

e6 

98 

a5 

bB 

e2 

1388 

3 

9d 

62 

03 

a5 

b9 

09 

60 

9d 

6c 

1390 

3 

76 

03 

a5 

ba 

9d 

6c 

03 

cd 

2d 

1398 

3 

03 

13 

dO 

02 

1B 

60 

c9 

00 

45 

13aO 

3 

4c 

df 

ef 

20 

07 

f 2 

fO 

02 

ac 

13aB 

3 

18 

60 

20 

12 

f 2 

Ba 

48 

a5 

2b 

13bO 

3 

ba 

cd 

03 

13 

fO 

03 

4c 

94 

f 6 

13bB 

3 

n 

4c 

e4 

fl 

20 

02 

f 2 

fO 

06 

13c0 

3 

03 

4c 

82 

f 6 

20 

12 

f 2 

a5 

12 

13cS 

3 

ba 

cd 

03 

13 

dO 

03 

4c 

8b 

f 9 

13dO 


f 6 

4c 

10 

fl 

20 

02 

f 2 

fO 

ee 

13dB 


03 

4c 

82 

f 6 

20 

12 

f 2 

a5 

2a 

13e0 

3 

ba 

cd 

03 

13 

dO 

03 

4c 

69 

cd 

13e8 

X 

fi 

4c 

56 

fl 

8d 

2a 

15 

48 

e2 

13f 0 

3 

a5 

9a 

cd 

03 

13 

fO 

03 

4c 

13 

13fB 

3 

7c 

e-f 

86 

97 

a5 

b9 

29 

Of 

eb 

1400 

: 

c9 

Of 

dO 

03 

4c 

2b 

15 

c9 

eb 

1408 

3 

00 

fO 

06 

68 

aa 

bd 

2a 

14 

7B 

1410 

3 

48 

68 

20 

57 

13 

ae 

04 

13 

5c 

1418 

3 

fO 

09 

c9 

Od 

dO 

05 

a9 

Oa 

91 

1420 


20 

57 

13 

a6 

97 

ad 

2a 

15 

3f 

1428 


18 

60 

00 

01 

02 

03 

04 

05 

e3 

1430 

: 

06 

07 

OB 

09 

Oa 

Ob 

Oc 

Od 

20 

143B 

3 

Oe 

Of 

10 

11 

12 

13 

14 

15 

28 

1440 

3 

16 

17 

18 

19 

la 

lb 

lc 

ld 

30 

1448 


le 

lf 

20 

21 

22 

23 

24 

25 

38 

1450 


26 

27 

28 

29 

2a 

2b 

2c 

2d 

40 

1458 


2e 

2f 

30 

31 

32 

33 

34 

35 

48 

1460 


36 

37 

38 

39 

3a 

3b 

3c 

3d 

50 

1468 


3e 

3f 

40 

61 

62 

63 

64 

65 

20 

1470 


66 

67 

68 

69 

6a 

6b 

6c 

6d 

60 

1478 


6e 

6f 

70 

71 

72 

73 

74 

75 

68 

1480 


76 

77 

7B 

79 

7a 

5b 

5c 

5d 

ae 

1488 


5e 

5f 

60 

61 

62 

63 

64 

65 

7B 

1490 


66 

67 

68 

69 

6a 

6b 

6c 

6d 

BO 

149B 


6e 

6f 

70 

71 

72 

73 

74 

75 

88 

14a0 


76 

77 

78 

79 

7a 

7b 

7c 

7d 

90 


14aB 

: 

7e 

7f 

80 

81 

82 

83 

84 

B5 

97 

14b0 

: 

86 

87 

88 

89 

Sa 

8b 

8c 

Bd 

9f 

14bB 

: 

Be 

Bf 

90 

91 

92 

93 

94 

95 

a7 

14cO 

: 

96 

97 

98 

99 

9a 

9b 

9c 

9d 

af 

I4c8 

: 

9e 

9f 

aO 

al 

a2 

a3 

a4 

a5 

b7 

14dÖ 

: 

a6 

a7 

aB 

a9 

aa 

ab 

ac 

ad 

bf 

14d8 

: 

ae 

af 

bO 

bl 

b2 

b3 

b4 

b5 

c7 

14e0 

s 

b6 

b7 

b8 

b9 

ba 

7b 

7c 

7d 

4c 

14eB 


7e 

bf 

cO 

41 

42 

43 

44 

45 

78 

14f 0 

x 

46 

47 

4B 

49 

4a 

4b 

4c 

4d 

eO 

14f 8 

E 

4e 

4f 

50 

51 

52 

53 

54 

55 

eB 

1500 

: 

56 

57 

58 

59 

5a 

5b 

5c 

5d 

fO 

1508 

E 

de 

df 

eO 

el 

e2 

e3 

e4 

e5 

f 7 

1510 

t 

e6 

e7 

eB 

e9 

ea 

eb 

ec 

ed 

ff 

1518 

S 

ee 

ef 

fO 

fl 

f 2 

f 3 

f 4 

f 5 

07 

1520 

s 

f 6 

f 7 

fB 

f 9 

fa 

fb 

fc 

fd 

Of 

1528 

E 

fe 

ff 

00 

6B 

3B 

e9 

30 

Bd 

e2 

1530 

X 

68 

15 

20 

7a 

15 

18 

a6 

97 

56 

1538 

S 

ad 

2a 

15 

60 

03 

lb 

40 

06 

62 

1540 

: 

lb 

2a 

04 

40 

01 

06 

lb 

2a 

7b 

1548 

E 

06 

80 

02 

03 

lb 

31 

Od 

Oa 

f 3 

1550 

X 

06 

ad 

6c 

OB 

20 

90 

28 

ad 

cb 

1558 

s 

71 

08 

c9 

17 

fO 

36 

c9 

19 

3d 

1560 

X 

fO 

45 

a9 

09 

2d 

75 

OB 

dO 

bf 

1568 

X 

01 

00 

20 

00 

00 

80 

19 

14 

02 

1570 

: 

07 

00 

00 

00 

00 

00 

00 

00 

7B 

1578 

: 

28 

02 

a2 

01 

bd 

4b 

15 

20 

35 

1580 

x 

57 

13 

e8 

ec 

4b 

15 

dO 

f 4 

c3 

1588 

s 

ae 

6B 

15 

■0 

01 

dO 

03 

4c 

07 

1590 

X 

2b 

17 

eO 

02 

dO 

03 

4c 

9d 

51 

1598 


15 

20 

83 

17 

60 

20 

b4 

17 

89 

!5a0 

E 

ad 

69 

15 

8d 

6b 

15 

ad 

6a 

e4 

15aB 

: 

15 

Bd 

6c 

15 

a9 

19 

8d 

6e 

b8 

15b0 


15 

ae 

6e 

15 

20 

be 

15 

ca 

3c 

15bB 

t 

dO 

fa 

20 

83 

17 

60 

20 

d9 

27 

15c0 


16 

ad 

6b 

15 

85 

8b 

ad 

6c 

6f 

15c8 


15 

85 

8c 

20 

f 5 

15 

1B 

ad 

8b 

15d0 


6b 

15 

69 

04 

85 

8b 

ad 

6c 

eS 

15d8 

: 

15 

69 

00 

B5 

Bc 

20 

f5 

15 

le 

15e0 


18 

a9 

40 

6d 

6b 

15 

Bd 

6b 

f 7 

15eB 


15 

a9 

01 

6d 

6c 

15 

Bd 

6c 

3e 

15f 0 

: 

15 

20 

06 

17 

60 

20 

d9 

16 

14 

15f 8 


20 

9B 

17 

a2 

01 

bd 

45 

15 

bc 

1600 


20 

57 

13 

eB 

ec 

45 

15 

dO 

9d 

1608 


f 4 

ac 

7B 

15 

20 

29 

16 

20 

f 7 

1610 

: 

81 

16 

18 

a5 

8b 

69 

OB 

B5 

86 

1618 


8b 

a5 

8c 

69 

00 

85 

8c 

88 

36 

1620 

1 zop 


dO 

ea 

20 

b4 

17 

20 

06 

17 

bd 

X 0410 

1630 


a9 OB 

Bd 71 V5 b. 


00 

Sd 

7e 

97 

1638 


74 

15 

ad 

74 

15 

2a 

Bd 

74 

f 2 

1640 

x 

15 

a9 

00 

6a 

8d 

73 

15 

a9 

93 

1648 


02 

Bd 

72 

15 

ad 

73 

15 

2a 

6f 

1650 

: 

bd 

60 

15 

2a 

9d 

60 

15 

bd 

75 

1658 


58 

15 

2a 

9d 

58 

15 

ce 

72 

c7 


1660 


15 

dO 

e9 

ce 

71 

15 

dO 

d2 

da 

1668 


bd 

60 

15 

eB 

9d 

60 

15 

ca 

7e 

1670 

X 

bd 

58 

15 

eS 

9d 

SB 

15 

eS 

7e 

1678 

s 

cB 

cO 

04 

dO 

b3 

20 

06 

17 

3e 

1680 

s 

60 

20 

d9 

16 

a9 

58 

85 

Bd 

bB 

1688 


a9 

15 

85 

Be 

20 

a4 

16 

20 

af 

1690 

X 

dO 

17 

a9 

60 

85 

Bd 

a9 

15 

fB 

169B 

: 

85 

Be 

20 

a4 

16 

20 

dO 

17 

d5 

16a0 

x 

20 

06 

17 

60 

20 

d9 

16 

a2 

04 

16a8 


00 

a9 

80 

Bd 

6d 

15 

aO 

00 

51 

16b0 

: 

bl 

Bd 

2c 

6d 

15 

fO 

05 

dO 

6f 

16b8 

s 

00 

3B 

bO 

01 

18 

bd 

50 

15 

fb 

16c0 

: 

2a 

9d 

50 

15 

C8 

i-O 

08 

dO 

c4 

16c8 

X 

e7 

ad 

6d 

15 

4a 

Bd 

6d 

15 

73 

16d0 


eS 

eO 

OB 

dO 

d9 

20 

06 

17 

29 

16d8 

s 

60 

OB 

Bd 

74 

15 

68 

8d 

75 

e4 

16e0 

X 

13 

68 

8d 

76 

15 

68 

Sd 

77 

15 

16e8 

s 

15 

ad 

75 

15 

4B 

ad 

74 

13 

c2 

16f0 

s 

48 

8a 

4B 

98 

48 

ad 

77 

15 

9c 

16f 8 

: 

48 

ad 

76 

15 

4B 

ad 

75 

15 

49 

1700 

X 

48 

ad 

74 

15 

28 

60 

68 

Bd 

21 

1708 


76 

15 

68 

Bd 

77 

15 

6B 

a8 

eB 

1710 

: 

68 

aa 

68 

Bd 

74 

15 

6B 

Bd 

46 

1718 

X 

75 

15 

ad 

77 

15 

48 

ad 

76 

a9 

1720 

X 

13 

48 

ad 

75 

15 

48 

ad 

74 

a7 

1728 

X 

15 

28 

60 

20 

b4 

17 

ad 

69 

fb 

1730 

X 

15 

85 

Bd 

ad 

6a 

15 

85 

Be 

a3 

173B 

I 

a9 

19 

Bd 

6e 

15 

a9 

28 

Bd 

f 9 

1740 

X 

78 

15 

ae 

6e 

15 

20 

9B 

17 

9f 

174B 

: 

20 

52 

17 

ca 

dO 

f 7 

20 

83 

05 

1750 

X 

17 

60 

20 

d9 

16 

a2 

01 

bd 

dl 

1758 

X 

3f 

15 

20 

57 

13 

B8 

ec 

3f 

bf 

1760 


15 

dO 

f 4 

ae 

78 

15 

20 

a4 

ea 

176B 

: 

16 

18 

a5 

8.; 

69 

08 

85 

Bd 

ad 

1770 

: 

a5 

Be 

69 

00 

85 

8e 

20 

dO 

a6 

1778 

: 

17 

ca 

dO 

ea 

20 

b4 

17 

20 

ca 

1780 

x 

06 

17 

60 

20 

d9 

16 

a2 

01 

09 

1788 


bd 

3c 

15 

20 

57 

13 

e8 

ec 

38 

1790 


3c 

15 

dO 

f 4 

20 

06 

17 

60 

79 

1798 


20 

d9 

16 

ae 

68 

15 

ca 

bd 

d6 

17a0 

X 

6f 

15 

aa 

a9 

20 

eO 

00 

fO 

65 

17aB 


07 

20 

57 

13 

ca 

4c 

a5 

17 

cb 

17b0 

X 

20 

06 

17 

60 

20 

d9 

16 

ae 

2c 

17b8 

: 

04 

13 

e8 

Se 

79 

15 

a2 

00 

ld 

17c0 


bd 

4e 

15 

20 

57 

13 

eB 

ec 

79 

17c8 


79 

15 

dO 

f 4 

20 

06 

17 

60 

ee 

17d0 


20 

d9 

16 

a2 

00 

bd 

50 

15 

10 

17d8 


20 

57 

13 

eB 

eO 

08 

dO 

f 5 

03 

17e0 


20 

06 

17 

60 

bf 

40 

bf 

40 

53 


Listing 1. Centronics-Druckertreiber 
für den C128. Bitte geben Sie das 
Programm im C64-Modus mit dem 
MSE auf Seite 109 ein. 


10 REM BRAFIK UND HARDCQPYTEST 

20 CDLOR 0,2s COLOR 1,7s CQLOR 4,15 

30 BRAPHIC 1,1 

40 BOX 1,0,0,319,199 

50 FOR 1=1 TO 180 STEP 10 

60 CIRCLE 1,160,100,100,5,,,I 

70 NEXT I 

80 CHAR 1,2,2,"DEMO-" 

90 CHAR 1,32,2,"FIBUR" 

100 CHAR 1,2,22,"EPSON-" 

110 CHAR 1,30,22,"HARDCOPY 
120 OPEN 1,4,1 

130 PRINT#1 ,TAB (20) ; ” JEST DER KLEINEN ÜARDCO 
PY" 

140 OPEN 2,4,15 
150 PRINT#2,1 
160 PRINTttl, 

170 PRINT#1,TAB(7>5"IEST DER BROSSEN ÜARDCOP 
Y" 

180 PRINT#2,2 

190 CLOSE 1: CLOSE 2 

200 BRAPHIC 0 

Listing 2. Programm zur Demonstration der beiden 
integrierten Hardcopy-Routinen. 


Speicherstelle $1570 (dezimal 5488) 

Der Randabstand für die vergrößerte Hardcopy ist in dieser 
Speicherstelle mit # 7 voreingestellt. 

Wollen Sie einen Drucker anschließen, der keine Grafik- 
Hardcopy beherrscht, können Sie die Hardcopy-Routinen 
entfernen. Dazu ist in Adresse $1401 der Wert $0f (dezimal 


A 

GND 

16 

B 

Flag-Busy 

11 oder 


Flag-Acknowl. 

10 

C 

DO 

2 

D 

Dl 

3 

E 

D2 

4 

F 

D3 

5 

H 

D4 

6 

J 

D5 

7 

K 

D6 

8 

L 

D7 

9 

M 

PA2-Strobe 

1 


Bild 2. Anschlußbelegung für ein Parallelkabel zwischen dem 
Userport des C128 und einem Centronics-Drucker 


15) in $10 (dezimal 16) zu ändern, und der Speicherbereich 
von $1300 (dezimal 4864) bis einschließlich $1529 (dezi¬ 
mal 5417) auf Diskette zu speichern. Auf diese Weise erhält 
man den reinen Druckertreiber ohne Hardcopy-Funktion. 

Zum Anschluß eines Druckers mitCentronics-Schnittstelle 
wird ein Kabel mit Userport-Stecker und ein 36poliger Am- 
phenol-Stecker benötigt. Als Kabel kann ein lladriges 
Computer- oder ein lOadriges Fernmeldekabel mit Abschir¬ 
mung verwendet werden. Die Länge des Kabels sollte 3 
Meter nicht überschreiten. Die Kabel- beziehungsweise Pin¬ 
belegung können Sie Bild 2 entnehmen. (G.M. Ritter/nj) 
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GRAFIK 


80-Zeidten-Grafik 


Das Grafik-Paket, das die 640 x 200-Punkte-Auf- 
lösung auf dem C128 unterstützt. Alle Grafikbe¬ 
fehle des Basic 7.0 stehen damit für den neuen 
HiRes-Modus zur Verfügung und können leicht 
programmiert werden. 

D er neue Basic-Interpreter des Commodore 128 enthält 
26 Befehle, mit deren Hilfe man einfach und schnell 
auch komplizierte Grafik-Programme erstellen kann. 
Diese Befehle wurden im Sonderheft 1/86 auf den 80-Zei- 
chen-Bildschirm umgesetzt. Da im nachfolgenden Artikel auf 
»Graphik-80« zurückgegriffen wird, haben wir zum besseren 
Verständnis das Listing nochmal abgedruckt. Das abge¬ 
druckte Basic-Programm (Listing 1) baut ein Maschinenpro¬ 
gramm für den »User-RAM-Bereich« von $1300 bis $1 bff auf. 
Nach dem Initialisieren dieses Maschinenprogramms mit 
»SYS DEC ("1303")« stehen die Befehle GRAFIK, BOX, 
CIRCLE, DRAW und PAINT auch für den VDC-Chip zur Verfü¬ 
gung. Die Befehle LOCATE, SCALE und SCNCLR und die 
Funktionen RCLR, RDOT und RGR können ohne Einschrän¬ 
kung im 640x200-Grafik-Modus benutzt werden. Beide 
Bildschirme können gleichzeitig im HiRes-Modus arbeiten, 
beim Aufruf eines Grafikbefehls prüft der Interpreter selb¬ 
ständig, welcher Video-Chip gerade angesprochen ist. 

Die HiRes-Grafik-Register 


Für die Grafikprogrammierung sind von den 36 Registern des 
VDC vor allem die Register 18,19,31,25 und 26 interessant. 
Der Inhalt von Register 26 bestimmt (im Grafikmodus!) Vor¬ 
der- und Hintergrundfarbe. Über Bit 0 bis 3 kann man 16 ver¬ 
schiedene Hintergrundfarben, über Bit 4 bis 7 16 verschie¬ 
dene Vordergrundfarben anwählen. 

Ein Beispiel: Die Befehlsfolge »POKE 54784,26:POKE 
54785, (3*16+2)« bewirkt, daß im HiRes-Modus eine rote 
Zeichenfarbe auf weißem Grund erscheint. Im Textmodus 
wird mit diesem Befehl nur die Hintergrundfarbe verändert. 
Register 25 ist ein mehrfach belegtes Register. Über die Bits 
0 bis 3 kann man den Bildschirm um maximal 16 Pixel horizon¬ 
tal nach links verschieben. Mit Bit 4 kann man zwischen einfa¬ 
cher (0) und doppelter (1) Pixelgröße wählen. Mit den Bits 5 
bis 7 kann man zwischen den drei Betriebsarten Text (Bit 
6 = 1), Semigrafik (Bit 5 = 1) und Grafik (Bit 7 = 1) wählen. 

Für uns ist hier nur interessant, daß man durch Beschrei¬ 
ben von Register 25 mit dem Wert 128 den HiRes-Modus 
wählen und durch Beschreiben des Registers mit dem Wert 
64 wieder in den Textmodus zurückkehren kann. Alle ande¬ 
ren Bits sind standardmäßig mit Null besetzt. Über die Regi¬ 
ster 18, 19 und 31 wird das Video-RAM angesprochen. Man 
besetzt in der beschriebenen Weise zunächst Register 18 
mit dem High-Byte und Register 19 mit dem Low-Byte der 
gewünschten Bildschirmspeicheradresse. 

Durch Schreiben in Register 31 kann man dann einen Wert 
in die gewählte Speicherstelle schreiben, durch Auslesen 
von Register 31 erhält man den Inhalt dieser Speicherstelle. 
Aber Vorsicht! Nach jeder Schreib- oder Leseoperation wird 
der RAM-Zeiger in Register 18/19 automatisch einen Schritt 
erhöht! Will man also einen Wert aus dem Video-RAM ausle- 
sen und anschließend (verändert) wieder zurückschreiben, 
so muß man die Zeiger 18/19 zweimal setzen. Das erscheint 
zwar sehr umständlich, doch hat diese Arbeitsweise einen 


überzeugenden Vorteil: lOmal »PEEK (Register 31)« ergibt 
die 10 Byte von Zeiger 18/19 bis Zeiger 18/19 + 9. Der Zei¬ 
ger 18/19 muß nur einmal gesetzt werden. Das Auslesen 
oder Vorbesetzen größerer Speicherbereiche wird so erheb¬ 
lich beschleunigt. 

Der neue GRAPHIC-Befehl 


Der GRAPHIC-Befehl wurde um die Funktionen GRAPHIC 
6,0 und GRAPHIC 6,1 erweitert. GRAPHIC 6 schaltet den 
8563-HiRes-Modus ein. Folgt der »6« eine »1«, so wird der 
Bildschirm gelöscht, folgt eine »0«, so bleibt der Bildschirm, 
wie er ist. Der Befehl GRAPHIC 6,1 ersetztauch den in dieser 
Implementation nicht vorgesehenen Befehl SCNCLR 6. Alle 
übrigen Informationen zur Implementation dieses Befehls 
sind im Sonderheft 1/86 als ausführlich kommentiertes 
Assemblerlisting abgedruckt. 

Die »Originalroutine« im ROM befindet sich im Speicher¬ 
bereich ab $6b5a. 

Die Befehle BOX, CIRCLE, DRAW und PAINT 


Diese Befehle funktionieren im 8563-Modus genauso, wie 
es im Bedienungshandbuch für die VIC-Grafik beschrieben 
ist. Einzige Änderung: Die x-Koordinaten dürfen nun im 
Bereich von 0 bis 639 liegen. Auch die Implementierung die¬ 
ser Be Te < lle ist denkbar einfach: Nacheinander werden die 
Programmteile PAINT ($61a8 bis $62b6), BOX ($62b7 bis 
$6388), DRAW ($6797 bis $67d6) und CIRCLE ($668e bis 
$674c) in den RAM-Bereich ab $1672 kopiert (Basic-Pro¬ 
gramm Zeile 5000 bis 5340). Darunter, in den RAM-Bereich 
ab $1952, wird der Programmteil »Strecke zeichnen« aus 
ROM $9b30 bis $9c18 kopiert. Als nächstes werden die 
neuen Adressen für Unterprogrammaufrufe eingesetzt 
(WHILE-DO-Schleife). Es folgt schließlich der neue 
GRAPHIC-Befehl. Im Basic-Programm ist er in Form von 
DATA-Zeilen abgelegt. Ebenfalls in Form von DÄTA-Zeilen sind 
die schon besprochene Routine »setpoint« (RAM $1400 bis 
$1671) und die Erweiterung der Interpreterschleife im Basic- 
Text enthalten. 

Eingabehinweise: Geben Sie Graphik-80 ein und spei¬ 
chern Sie das Programm. Dann brauchen Sie nur noch als 
erste (!) Programmzeile »bload "graphik-80.m": sys dec 
, (" 1303 ")« einzugeben und das Grafik-Paket ist aktiviert. Alle 
Grafikbefehle beziehen sich jetzt auf den 80-Zeichen- 
Schirm. (Th. Rumbach/D. Winkler/ev/og) 


1 REM - <24SPftCED .G_R.H_P_H.I-K — 86 

2 : 

3 REM "<4SPACE>ERSTELLT SB APHI K-£AKET FW B0 
-2EICHEN-ÜLLLS-SILDSCHIRM 

4 : 

5 REM "<24SPACE>DES<2SPACE>£-128 

8 i 

9 REM "C23SPACE>VERSION 1.00 

10 : 

11 : 

1000 FAST 
1020 RESTORE 
1040 BANK 15 

10&0 SCNCLR 5: PRINT CHR*(17> CHR*<17> TAB <2 
0)"ERSTELLEN EINES SRAPHIK-£AKETES" 

Listing 1. »Grafik-80«, 640 x 200-Punkte-Auflösung 
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1080 PRINT CHR*(17) TAB(17) "FTiR DEN B563-KIR 

8000 FOR I=A TO E 

£3-SRAPHIK-2IL DSCHIRM" 

8020 READ D 

1 100 F'RINT CHR*(17> CHR* (17) CHR*(17) " {2SPA 

B040 POKE I,D 

CE/^ARBEITET: " 

8060 NEXT I 

1120 PRTNT s PRINT 

8080 RETURN 

1140 « 

8100 2 

2006 REM "ERWEITERUNG DER JJMTERPRETERSCHLEIF 

B460 REM "SEPIERROUTINE 2 

E LADEN 

8480 : 

2020 : 

B500 FOR I=A TO E 

2040 PRINT TAB(25) "HEUE JNTERPRETERSCHLEIFE 

8520 POKE G, PEEK(I) 

2060 A= DEC("1300"): E= DEC("1398") 

B540 G= G+l 

2080 GOSUB 8000 

8560 NEXT I 

2100 : 

8580 RETURN 

3000 REM "HEUE SDUTINE F*R ’SUNKT SETZEN, LS 

8600 : 

SCHEN UND TESTEN’ LADEN 

9000 : 

3020 : 

10000 REM "DATAS F'SR NEUE 1NTERPRETERSCHLEIF 

3040 PRINT TAB(25) "SUNKT SETZEN, LOSCHEN, T 

E 

ESTEN 

10010 2 

3060 A= DEC("1400"): E= DEC("1671") 

10020 DATA 76,45,19,76,6,19,120,169,45,141, 

3080 GOSUB 8000 

8,3,169,19,141,9,3,88,169,0,141,0 

3100 : 

10030 2 

4000 REM ".ERWEITERUNG DER .G_R.F1P_K.I-C.— ROUTINE LA 

10040 DATA 255,169,6,141,6,213,169,32,133,48 

DEN 

,133,50,133,52,169,0,133,47,133 

4020 : 

10050 2 

4040 PRINT TAB (25) "ERWEITERUNG DER .G_R_H.PK.I_K.- 

10060 DATA 49,133,51,96,32,128,3,201,222,14 

SOUTINE 

4,31,201,233,176,27,170,36,215,16 

4060 A= DEC("1A3E") : E= DEC("1AB6") 

10070 : 

4080 GOSUB 8000 

10080 DATA 52,189,123,18,141,78,19,189,135, 

4100 : 

18,141,79,19,138,32,128,3,32,0,0 

5000 REM "KOK-ROUTINEN IN PFUI—BEREICH KOPIER 

10090 2 

EN 

10100 DATA 76,246,74,32,134,3,76,243,74,62, 

5020 : 

114,215,129,147,141,43,86,88,226 

5040 PRINT TAB (25) "Sflü -> HSfl - KOPIE 

10110 2 

5060 A= DEC("61A8"): E= DEC("6388"): REM "£fl 

10120 DATA 121,96,26,22,103,23,24,101,100,24 

iSX UND SSA 

,105,105,106,105,189,162,18,141 

5080 G= DEC("1672") 

10130 : 

5100 GDSUB 8500 

10140 DATA 78,19,189,174,18,141,79,19,76,73 

5120 : 

,19,90,168,215,183,142,141,43,151 

5140 A= DEC("6797"): E= DEC("67D6"): REM "SS 

1012- : 

SH 

1016W DATA 85,226,121,96,107,97,103,98,102, 

5160 IF G<>DEC("1853") THEN PRINT "£EHLER !" 

101,100,103,105,105,106,105,85 

: STOP 

10170 : 

5180 GOSUB 8500 

12000 REM "DATAS F*R SOUTINE SUNKT SETZEN, L 

5200 : 

fBCHEN, TESTEN 

5220 A= DEC("668E"): E= DEC("674C")! REM 

12010 2 

RC LE 

12020 DATA 76,48,22,76,9,20,76,93,22,173,0, 

5240 IF G<>DEC("1893") THEN PRINT "fEHLER !" 

255,72,169,0,141,0,255,169,7,141 

: STOP 

12030 2 

5260 GOSUB 8500 

12040 DATA 6,213,104,141,0,255,96,173,0,255 

5280 : 

,133,158,169,0,141,0,255,133,253 

5300 A= DEC("9B30"): E= DEC("9C1B"): REM "£T 

12050 : 

RECKE ZEICHNEN 

12060 DATA 133,254,173,52,17,208,90,169,199, 

5320 IF G< >DEC("1952") THEN PRINT "fEHLER !" 

205,51,17,144,83,169,127,237,49 

: STOP 

12070 2 

5340 GOSUB 8500 

12080 DATA 17,169,2,237,50,17,144,71,172,51, 

5360 : 

17,185,150,20,133,253,185,99,21 

5380 READ AD* 

12090 : 

5400 DO WHILE AD*<>"ENDE" 

12100 DATA 133,254,174,50,17,173,49,17,41,24 

5420 READ MN*, AL*, AH* 

8,74,74,74,24,125,147,20,133,252 

5440 AD= DEC(AD*) 

12110 2 

5460 POKE AD, DEC(MN*): POKE AD+1, DEC(AL*): 

12120 DATA 24,165,253,101,252,133,253,165,25 

POKE AD+2, DEC(AH*) 

4,105,0,133,254,162,18,32,204,205 

5480 READ AD* 

12130 2 

5500 LOOP 

12140 DATA 162,19,165,253,32,204,205,32,216, 

5520 : 

205,133,252,173,49,17,41,7,170,189 

5540 PRINT TAB(25) "fERTIGES SASCHINENPROGRA 

12150 2 

MM ABSPEICHERN 

12160 DATA 139,20,24,96,56,96,12B,64,32,16,8 

5560 IF DS >20 THEN PRINT DS*: STOP 

,4,2,1,0,32,64,0,80,160,240,64,144 

5580 BSAVE "GRAPHIK-80.M",D0,U8,ON B0,P(DEC( 

12170 2 

"1300")) TO P(DEC("1AB7")) 

12180 DATA 224,48,128,208,32,112,192,16,96,1 

5600 IF DS >20 THEN PRINT DS*: STOP 

76,0,80,160,240,64,144,224,48,128 

5620 SYS DEC("1303") 

12190 : 

5640 PRINT CHR*(17) CHR*(17) "{5SPACE>SRAPHI 

12200 DATA 208,32,112,192,16,96,176,0,80,160 

K-SAKET FERTIG INSTALLIERT, "; 

,240,64,144,224,48,128,208,32,112 

5645 PRINT "GESPEICHERT UND INITIALISIERT." 

12210 : 

5660 END 

12220 DATA 192,16,96,176,0,80,160,240,64,144 

6000 END 

,224,48,128,208,32,112,192,16,96 

7960 REM "SDPIERROUTINE 1 

12230 : 

7980 : 

12240 DATA 176,0,80,160,240,64,144,224,48,12 
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12250 

1226© 

12270 

12280 

12290 

12300 

12310 

12320 

12330 

12340 

12350 

12360 

12370 

12380 

12390 

12400 

12410 

12420 

12430 

12440 

12450 

12460 

12470 

12480 

12490 

12500 

12510 

12520 

12530 

12540 

12550 

12560 

12570 

12580 

12590 

12600 

12610 

12620 

12630 

14000 

14010 

14020 

14030 

14040 

14050 

14060 

14070 

14080 

14090 

14100 

14110 

14120 


8,208,32,112,192,16,96,176,0,80 

DATA 160,240,64,144,224,48,128,208,32, 
112,192,16,96,176,0,80,160,240,64 

DATA 144,224,48,12B,208,32,112,192,16, 
96,176,0,80,160,240,64,144,224,48 

DATA 12B,208,32,112,192,16,96,176,0,80 
,160,240,64,144,224,48,128,208,32 

DATA 112,192,16,96,176,0,80,160,240,64 
,144,224,48,128,208,32,112,192,16 
: 

DATA 96,176,0,80,160,240,64,144,224,48 
,128,208,32,112,192,16,96,176,0 

DATA 80,160,240,64,144,224,48,128,208, 
32,112,192,16,96,176,0,80,160,240 

DATA 64,144,224,48,128,208,32,112,192, 

0 , 0 , 0 , 0 , 1 , 1 , 1 , 2 , 2 , 2 , 3 , 3 , 3 , 4 , 4,4 

DATA 5,5,5,5,6,6,6,7,7,7,8,8,8,9,9,9,1 
0,10,10,10,11,11,11,12,12,12,13 

DATA 13,13,14,14,14,15,15,15,15,16,16, 
16,17,17,17,18,18,18,19,19,19,20 

DATA 20,20,20,21,21,21,22,22,22,23,23, 
23,24,24,24,25,25,25,25,26,26,26 

DATA 27,27,27,28,28,28,29,29,29,30,30, 
30,30,31,31,31,32,32,32,33,33,33 

DATA 34,34,34,35,35,35,35,36,36,36,37, 
37,37,38,38,38,39,39,39,40,40,40 

DATA 40,41,41,41,42,42,42,43,43,43,44, 
44,44,45,45,45,45,46,46,46,47,47 

DATA 47,48,48,48,49,49,49,50,50,50,50, 
51,51,51,52,52,52,53,53,53,54,54 

DATA 54,55,55,55,55,56,56,56,57,57,57, 
58,58,58,59,59,59,60,60,60,60,61 

DATA 61,61,62,62,62,63,63,63,32,28,20, 
176,34,166,131,208,5,73,255,37,252 

DATA 44,5,252,133,252,162,18,165,254, 
32,204,205,162,19,165,253,32,204 
: 

DATA 205,162,31,165,252,32,204,205,165 
,158,141,0,255,96,32,28,20,176,245 

DATA 37,252,240,6,32,87,22,162,0,96,32 
,87,22,162,255,96 

REM "DATAS FSR £RWEITERUNG DES G.RJWUC. 
-JEFEHLS 

DATA 201,158,208,11,32,34,160,32,128,3 
,169,0,133,216,96,32,244,135,224 
: 

DATA 6,240,41,176,36,138,72,169,0,141, 
0,255,162,25,169,64,32,204,205,32 
: 

DATA 12,206,165,215,72,169,128,133,215 

,32,66,193,104,133,215,104,72,170 

: 

DATA 76,110,107,76,40,125,169,0,141,0 
,255,162,25,169,128,32,204,205,32 

DATA 28,158,169,0,141,0,255,224,2,176, 
229,224,0,240,29,160,64,132,8,160 

DATA 0,152,162,18,32,204,205,162,19,32 
,204,205,162,31,32,204,205,136,208 


14130 

14140 

DATA 

•250,198,8 

,208 

,246, 

19900 

20000 

DATA 

1A3B, 

4C, 

00, 

14 

20010 

DATA 

16D5, 

20, 

00, 

14 

20020 

DATA 

1A2D, 

20, 

00, 

14 

20030 

DATA 

188D, 

20, 

ID, 

1A 

20040 

DATA 

19C7, 

20, 

ID, 

1A 

20050 

DATA 

19EB, 

20, 

0C, 

1A 

20060 

DATA 

1A07, 

20, 

0C, 

1A 

20070 

DATA 

1887, 

4C, 

6C, 

18 

20080 

DATA 

1890, 

4C, 

6C, 

18 

20090 

DATA 

17B1 , 

20, 

52, 

19 

20100 

DATA 

17F1, 

20, 

52, 

19 

20110 

DATA 

1884, 

20, 

52, 

19 

20120 

DATA 

1948, 

20, 

52, 

19 

20130 

DATA 

1692, 

20, 

06, 

14 

20140 

DATA 

16C6, 

20, 

06, 

14 

20150 

DATA 

1712, 

20, 

06, 

14 

20160 

DATA 

1747, 

20, 

06, 

14 

20170 

DATA 

16E5, 

20, 

46, 

17 

20180 

DATA 

16FA, 

20, 

46, 

17 

20190 

DATA 

1740, 

4C, 

B5, 

16 

20200 

DATA 

1869, 

4C, 

ID, 

1A 

20210 

DATA 

1672, 

20, 

32, 

9E 

20220 

DATA 

1781 , 

20, 

32, 

9E 

20230 

DATA 

1893, 

20, 

32, 

9E 

20240 

DATA 

1B53, 

EA, 

EA, 

EA 

20250 

50000 

60000 

DATA 

ZZS=’ 

ENDE 

1 GRAPHIK-B0": UN=B 

60010 

OPEN 

15,UN, 

,15/ 

•S0: 1 

•+zzs 

60020 

60030 

60040 

60050 

60060 

60070 

GOSUB 60100 
SAVE ZZS,UN 
BDSUB 60100 
VERIFY ZZS,UN 
CLDSE 15 

END 




60100 TNPUT#15, Sl, SS, 52, S3 
60110 1F Sl=l THEN PRINT S2; SS 
60120 IF Sl<20 THEN RETURN 
60130 PRINT Sl “ SS "S2; " 

60140 CLOSE 15 

Listing 1. »Grafik-80« eine Erweiterung, die die 640 x 
200-Punkte-Auflösung unterstützt (Schluß) 


S3 
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Churacter 80 


Die erste Erweiterung zu Graphik 80 ist die des 
CHAR-Befehls. Er beherrscht jetzt verschiedene 
Schriftgrößen in mehreren Richtungen und ist 
variabler als der PRINT-Befehl. 

D as im folgenden Text beschriebene Programm »Charac- 
ter 80« ist eine Ergänzung des 640x200-Punkte-Gra- 
fikpaketes »Graphik 80« für den C 128, das in Ausgabe 
12/85 vorgestellt und auf den vorhergehenden Seiten noch 
einmal abgedruckt wurde. »Character 80« fügt in den Basic- 
Interpreter des C 128 einen neuen CHAR-Befehl ein, der bei 
eingeschaltetem VDC-Grafikbildschirm wirksam wird. Der 
CHAR-Befehl dient dazu, Buchstaben, Ziffern oder ganze 
Textzeilen auf dem Grafikbildschirm darzustellen. Er vertritt 
den PRINT-Befehl, den man nur im Textmodus verwenden 
kann. Man benötigt den CHAR-Befehl zum Beispiel, um die 
Achsen eines Koordinatensystems zu beschriften oder um 
den Spielstand in einem Spiel mit Grafikdarstellung ein¬ 
zublenden. Ein wichtiger Befehl also, der nun auch in Graphik 
80 nicht länger fehlen soll. 

Der neue CHAR-Befehl 


Die CH AR-Routine für den 80-Zeichen-Bildschirm wurde völ¬ 
lig neu geschrieben und gegenüber der im Basic 7.0 vorge¬ 
sehenen CHAR-Routine für den 40-Zeichen-Bildschirm 
stark erweitert. Aus diesem Grund hat sich die Syntax des 
Befehls geändert. Der neue Befehl lautet: 

CHAR [f],x,y,[w],q$ 

f: ist ein ganzzahliger Wert zwischen 0 und 1. Wird für f eine 
Null angegeben, so wird der Text in q$ in der Farbe des Bild¬ 
schirmhintergrunds ausgegeben. Nimmt f den Wert eins an, 
dann wird der Text in q$ in der Zeichenfarbe ausgegeben 
(vergleiche Beschreibung des COLOR-Befehls im Bedie¬ 
nungshandbuch, Seite 4 bis 35). 

x,y: sind die Grafik-Koordinaten des Mittelpunktes des 
ersten Zeichens in q$. x darf zwischen 0 und 639, y zwi¬ 
schen 0 und 199 liegen. 

w: ist der Winkel, um den der String q$ gegenüber der 
Waagerechten (x-Achse) um (x,y) gedreht wird, w darf zwar 
eine beliebige positive Integerzahl sein, aber nur die Winkel 
0, 90, 180, 270, 360, ... Grad ergeben lesbare Textdarstel¬ 
lungen. Für den Fall, daß w nicht angegeben wird, ist w mit 
Null vorbesetzt. 

Für f,x,y,w dürfen auch Variable oder numerische Aus¬ 
drücke, deren Ergebnis im erlaubten Bereich liegt, eingesetzt 
werden. 

q$: ist eine Zeichenkette in Anführungszeichen, eine 
Stringvariable oder ein beliebiger Ausdruck des Typs String. 
Steuerzeichen innerhalb von »q$« bis auf (RVS ON), (RVS 
OFF), (CSR UP) und (CSR DOWN) werden ignoriert. (RVS 
ON) schaltet die Invers-Darstellung ein, (RVS OFF) schaltet 
sie wieder aus. ^DSR U P) setzt den folgenden Text eine Halb¬ 
zeile höher, (CSR DOWN) setzt den folgenden Text eine Halb¬ 
zeile tiefer. 

Der neue CHAR-Befehl wird nur bei eingeschalteter 
640x200-Punkte-Grafik aktiv. Im 80-Zeichen-Textmodus 
oder bei VIC-Grafiken bleibt der alte CHAR-Befehl so, wie er 
im Bedienungshandbuch des C 128 auf den Seiten 4-28 
und 4-29 beschrieben ist, erhalten. 

An dieser Stelle seien ein paar Sätze erlaubt zum Vergleich 
der Basic 7.0-Version des CHAR-Befehls und Character 80. 


Nach der alten Version des CHAR-Befehls durften x und y nur 
Werte zwischen 0 und 79 beziehungsweise 0 und 24 anneh¬ 
men. Auf dem Grafikbildschirm wurde eine Textdarstellung 
simuliert, wie sie auch im Textmodus möglich ist. Diese 
Methode hat den Vorteil, daß der CHAR-Befehl auch im Text¬ 
modus zur direkten Positionierung einer Textzeile angewandt 
werden kann. Punktgenaues Einfügen eines Textes in ein 
Grafikbild - etwa bei der Beschriftung von Funktionsgraphen 
- ist jedoch nur möglich, wenn die Position des Grafik- 
Cursors als Bezugspunkt für den Beginn der Zeichenkette 
dient. Character 80 betrachtet die in x und y angegebene 
Grafik-Cursorposition als Mittelpunkt des ersten Buchsta¬ 
bens in der Zeichenkette q$. 

Der nächste und vielleicht auffälligste Unterschied zwi¬ 
schen neuer und alter CHAR-Routine ist die Möglichkeit, 
Textzeilen nicht nur waagerecht (w=0), sondern auch senk¬ 
recht aufwärts (w=90) und abwärts (w=270) und auf dem 
Kopfstehend (w=180) auszugeben. Dabei wird berücksich¬ 
tigt, daß die Auflösung in x-Richtung mit 640 Punkten 
wesentlich höher ist als die 200-Punkte-Auflösung in y- 
Richtung. Durch Einführen eines drehwinkelabhängigen Kor¬ 
rekturfaktors wurde erreicht, daß ein und dieselbe Textzeile 
in y-Richtung fast genauso lang und so hoch erscheint wie in 
x-Richtung. Wie oben dargestellt, werden für w auch andere 
als die genannten Werte akzeptiert. Die Auflösung von 8x8 
Punkten pro Buchstaben reicht aber leider nicht, um für be¬ 
liebige Winkel lesbare Darstellungen zu erreichen. Character 
80 kann auf zwei verschiedene Schriftgrößen eingestellt 
werde., Voreingestellt ist eine vergrößerte Schrift, die etwa 
40 Zeichen in der Waagerechten erlaubt. Mit 
POKE 5061,128: POKE 5066,144: POKE 5108,48 
kann auch auf die normale 80-Zeichen-Schrift umgestellt 
werden. Mit 

POKE 5061,223: POKE 5066,239: POKE 5108,192 
kann die vergrößerte Schrift gewählt werden. Vor allem beim 
Senkrechtschreiben ist die zuletzt genannte Betriebsart der 
besseren Lesbarkeit wegen vorzuziehen. 

Und noch eine dritte wichtige Änderung der CHAR- 
Routine wurde mit Character 80 eingeführt: Abhängig davon, 
ob im Textmodus (mit CHR$(14) beziehungsweise CHR$ 
(142)) Groß-/Grafik- oder Groß-/Kleinschrift eingestellt 
wurde, stellt auch der neue CHAR-Befehl Groß-/Grafik- oder 
Groß-/Kleinschrift dar. Dadurch wird der gesamte Zeichen¬ 
satz des CHAR-ROMs nutzbar. Die Umschaltung Invers-/ 
Normalschrift kann jetzt innerhalb von q$ mit den vom PRINT- 
Befehl her bekannten Steuerzeichen vorgenommen werden, 
ebenso wie das Hoch- und Tiefstellen von ganzen Textteilen 
in Halbschritten. Auf diese Weise kann eine ganze Textzeile, 
egal wie viele Indizes, Potenzen und Inversteile sie enthält, 
mit einem einzigen Befehl ausgegeben werden. Auch mehr¬ 
faches Tiefer- oder Höherstellen hintereinander wird 
erkannt. 

Nach der ausführlichen Beschreibung der Möglichkeiten 
der neuen CHAR-Routine nun zum praktischen Teil! Es folgt 
ein »Sechs-Stufen-Plan«zum Einfügen des neuen Befehls in 
das Grafikpaket Graphik 80. 

1) Laden Sie das Basic-Programm Graphik 80. 

2) Fügen Sie die abgedruckten Basic-Zeilen (Listing 1) in das 
Programm ein. 

3) Ersetzen Sie die Zahl 215 in Zeile 10100 durch die Zahl 
183 und die Zahl 103 in Zeile 10120 durch die Zahl 26. 

4) Ersetzen Sie in Zeile 5580 die Endadresse des zu spei¬ 
chernden Bereichs ($1ab7) durch die neue Endadresse 
($1c00). 
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5) Löschen Sie die alte und speichern Sie die neue Version 
von Graphik 80. 

6) Starten Sie das Programm mit RUN. 

Wenn das Programm ohne Fehlermeldung abgelaufen ist 
und sich kein Fehler beim Abtippen der DATA-Zeilen ein¬ 
geschlichen hat, dann befindet sich jetzt das fertige neue 
Grafikpaket Graphik 80 auf Ihrer Diskette. Sie können es wie 
gewohnt mit 

BLOAD "GRAPHIK-80.m": SYS DEC ("1303") 

laden und starten. 

Ein bißchen Theorie 


Die meisten Leser, vorausgesetzt, daß sie bis hierher durch¬ 
gehalten haben, werden nun fragen: Wie funktioniert der 
CHAR-Befehl überhaupt? Auch Leser, die (noch) keinen 
C 128 besitzen und ihren eigenen CHAR-Befehl schreiben 
wollen, werden sich dafür interessieren, nach welchem Prin¬ 
zip der CHAR-Befehl aufgebaut ist: 

Allen Zeichen des CBM-Zeichensatzes liegt eine Matrix 
aus 8x8 Punkten zugrunde. Acht nebeneinanderliegende 
Punkte in der Horizontalen werden von den acht Bit eines 
Bytes im CHAR-ROM dargestellt. Acht solcher Zeilen (ent¬ 
sprechend acht Byte im CHAR-ROM) in der Vertikalen bilden 
die Matrix für ein Zeichen. Alle Bits in dieser Matrix, die den 
Wert »1« haben, liefern einen farbigen Punkt auf dem Bild¬ 
schirm. Alle Bits mit dem Wert »0« werden in der Farbe des 
Bildschirmhintergrundes dargestellt. Es gibt 128 verschie¬ 
dene Zeichen im Commodore-Zeichensatz, die wahlweise 
normal oder invertiert ausgegeben werden können. Insge¬ 
samtwerden also 256 x 8 = 2 KByte Speicherplatz für einen 
Zeichensatz benötigt. Welches dieser 256 verschiedenen 
Zeichen an welcher Stelle auf dem Bildschirm erscheinen 
soll, das ist im Bildschirmspeicherbereich vermerkt: Jedem 
Platz auf dem Bildschirm ist genau ein Platz im Video-RAM 
zugeordnet. Steht im zehnten Speicherplatz des Video- 
RAMs eine »24«, dann wird an der zehnten Position auf dem 
Bildschirm das 24. Zeichen des CHAR-ROMs dargestellt. Im 
CHAR-ROM sind für dieses Zeichen die 8 Byte von 24 x 8 
( = 192) bis 24 x 8 + 7 (=199) reserviert. Zusätzlich zum 
Video-RAM gibt es noch einen genauso großen Farbspei- 
cherbereich. Zu jedem Byte im Video-RAM gehört genau ein 
Byte im Color-RAM. In diesem Byte ist verzeichnet, in wel¬ 
cher Farbe das Zeichen erscheinen soll, und - im Falle des 
8563 im C 128 - ob es blinkend oder mit Unterstreichung 
dargestellt wird. Diese Überlegungen gelten nur für den Text¬ 
modus. In dieser Betriebsart übernimmt der Videocontroller 
die Aufgabe, die den Zeichen des Video-RAM entsprechen¬ 
den Bytes aus dem CHAR-ROM zu holen und an der richtigen 
Stelle auf den Bildschirm zu zeichnen. Schaltet man dagegen 
den Grafikmodus ein, dann wird die gesamte Zeicheninfor¬ 
mation nur aus dem Video-RAM ausgelesen, der CHAR- 
ROM-Bereich wird nicht mehr angesprochen. Gleichzeitig 
wird aber ein sehr viel größerer Bildschirmspeicher benötigt: 
1 Bit für jeden Punkt, also rund 16 KByte bei einer Auflösung 
von 200 x 640 Punkten (mehr zu diesem Thema im Beitrag 
Graphik 80). Da aber der Videocontroller nur noch Punkte 
darstellen kann, braucht man ein eigenes Programm, um die 
Zeichen aus dem CHAR-ROM auf dem Bildschirm abzubii- 
den. Alle 64 Punkte der 8 x 8-Matrix müssen einzeln ermittelt 
und über die Routine »Punkt setzen« ausgegeben werden. 
Genauso macht es auch Character 80. Zunächst wird der 
Grafik-Cursor vom Mittelpunkt auf den rechten oberen Eck¬ 
punkt der 8 x 8-Matrix verschoben. Dann wird das erste Byte 
des Buchstabens, den man darstellen will, aus dem CHAR- 
ROM geholt. Man liest das erste Bit dieses Bytes und setzt 
einen Punkt an die Position des Grafik-Cursors, wenn das Bit 
»1«ist. Ist das Bit »0«, dann geschieht nichts. Danach wird der 


Cursor in waagerechter Richtung um einen Punkt nach links 
verschoben. Man liest das zweite Bit, gibt den nächsten 
Punkt aus, rückt den Cursor eins weiter nach links und so wei¬ 
ter, bis alle acht Bit abgearbeitet sind. Dann holt man das 
zweite Byte des gewählten Buchstabens, setzt den Cursor 
eins tiefer und anschließend auf den rechten Rand zurück. 
Von dort beginnt das Spiel von vorn: Achtmal untereinander, 
acht Punkte nebeneinander. Dabei ist es unwesentlich, ob 
man, wie hier für Character 80 beschrieben, rechts oben 
oder links unten anfängt. Nachdem der letzte Punkt des 
Buchstabens gezeichnet ist, wird der Grafik-Cursor auf den 
Mittelpunkt des folgenden Buchstabens verschoben, die 
Routine ist bereit für das nächste Zeichen. 

Welche Zeichen ausgegeben werden, das steht in der Zei¬ 
chenkette q$. CHAR geht so vor: Es nimmt den ersten Buch¬ 
staben der Kette, stellt fest, das wievielte Zeichen im CHAR- 
ROM diesem Buchstaben entspricht (CBM-ASCII - Bild¬ 
schirmcode - Wandlung) und gibt dieses Zeichen aus. Dann 
wird das zweite Zeichen geholt, ausgewertet und ausgege¬ 
ben und so weiter bis zum Ende der Zeichenkette. Steuerzei¬ 
chen innerhalb dieses Strings werden einfach übergangen. 
Nur die Steuerzeichen (CSR UP), (3SR DOWN), (RVS ON) 
und (RVS OFF) werden (in unserem Fall!) erkannt. (CSR UP) 
bewirkt, daß der Grafik-Cursor vier Zeilen (V 2 Buchstabe) 
nach oben verschoben wird, pSR DOWN)schiebt ihn vier 
Zeilen nach unten. (RVS ON) setzt ein Flag, das bei der Ermitt¬ 
lung der CHAR-ROM-Adresse abgefragt wird. (RVS OFF) 
löscht dieses Flag wieder. Das RVS ON-Flag ist die Vier, das 
RVS OFFFIag die Null. Die Zahlen wurden gerade deshalb 
ausgewählt, weil man so nur das RVS-Flag zum High-Byte der 
CHAR-ROM-Anfangsadresse addieren muß, um den richti¬ 
gen Speicherbereich zu treffen. Ein Beispiel zur Erklärung: 
Der CHAR-ROM-Speicher für Groß-/Kleinschrift beginnt bei 
$d80C, der inverse Groß-/Kleinschriftzeichensatz bei 
SdcOO; ist der Inversmodus ausgeschaltet, dann ist das RVS- 
Flag 0: $d8+$0=$d8; bei eingeschaltetem Inversmodus ist 
das RVS-Flag 4: $d8+$4=$dc. Ob als Anfangsadresse 
SdOOO für Groß-/Grafikschrift oder $d800 für Groß-/Klein- 
schrift gewählt wird, das hängt vom Inhalt der Speicherstelle 
$f1 ab, die unter anderem anzeigt, welcher der beiden Zei¬ 
chensätze schon im Textmodus voreingestellt wurde. 

Koordinatentransformafion 


Nun fehlt nur noch ein Punkt in der Beschreibung des Prin¬ 
zips, nach dem Character 80 arbeitet: Wie dreht man die dar¬ 
gestellte Zeichenkette um den Mittelpunkt des ersten 
Buchstabens? 

Der Mittelpunkt (x,y) des ersten Buchstabens ist der 
Ursprung eines gedachten kartesischen Koordinatensy¬ 
stems. Die Horizontale des Bildschirms ist die Richtung der 
x-Achse dieses Koordinatensystems, die Vertikale des Bild¬ 
schirms ist die Richtung der y-Achse. Alle Bildpunkte inner¬ 
halb einer zusammenhängenden Zeichenkette eines CHAR- 
Befehls werden relativ zum Ursprungspunkt dieses Koordi¬ 
natensystems berechnet: Der Mittelpunkt des zweiten Buch¬ 
stabens erhält also zum Beispiel die Koordinaten (0,8), die 
rechte obere Kante des dritten Buchstabens die Koordinaten 
(-4,20) (y-Richtung wie die physikalische Richtung von oben 
nach unten). Alle Punkte eines Strings werden nach diesem 
Schema berechnet. Anschließend wird das Koordinatensy¬ 
stem um den Winkel w gedreht. Man könnte ebenso sagen: 
Der berechnete Punkt wird um den Ursprung des Koordina¬ 
tensystems gedreht; der Algorithmus bleibt der gleiche. Er 
lautet: 

x neu = w + y-sin w 
y n eu = y-cos w - x-sin w 

Darin sind x und y die nicht gedrehten Koordinaten (relativ 
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4200 REM " *** fiEUE CHUR— ROUTINE LADEN *** “ 

15210 : 

4220 : 

15220 DATA 101,243,133,109,32,239,27,162,1,1 

4240 PRINT TAB (25) "HEUE .CJLn.R-.RQUT INE" 

42,0,255,160,7,177,108,72,136,16 

4260 A= DEC("1AB7")! E= DEC(“1BFF") 

15230 : 

4280 SOSUB 8000 

15240 DATA 250,162,0,142,0,255,162,8,134,106 

4300 : 

,134,107,104,42,72,144,6,32,158 

4320 A= DEC("139E")s E= DEC("13FF") 

15250 : 

4340 60SUB 8000 

15260 DATA 19,32,0,20,238,96,17,208,3,238,9 

4360 : 

7,17,198,107,208,233,24,169,1,109 

5550 SCRATCH "6RAPHIK-80.M" 

15270 : 

14150 : 

15280 DATA 98,17,141,98,17,144,3,238,99,17, 

15000 REM " *** J3ATAS FKR DIE C.HAR-.RQUTINE * 

104,56,173,96,17,233,8,141,96,17 

#* " 

15290 : 

15010 : 

15300 DATA 176,3,206,97,17,162,8,198,106,208 

15020 DATA 169,0,141,0,255,162,25,32,218,205 

,196,56,173,98,17,233,4,141,98,17 

,48,3,76,215,103,32,50,158,162,31 

15310 : 

15030 : 

15320 DATA 176,3,206,99,17,24,173,96,17,105, 

15040 DATA 32,82,158,32,6,158,140,92,17,141 

12,141,96,17,144,3,238,97,17,96 

,93,17,169,0,162,7,157,96,17,202 

15330 : 

15050 : 

15340 DATA 56,173,96,17,233,4,141,96,17,176 

15060 DATA 16,250,133,113,32,92,121,32,123, 

,3,206,97,17,76,27,27 

135,133,112,164,113,196,112,240,19 

15350 : 

15070 : 

15360 DATA 160,43,32,116,154,162,3,189,96,17 

15080 DATA 169,127,141,0,255,177,36,162,0,14 

,157,84,17,157,88,17,202,16,244 

2,0,255,32,5,27,230,113,208,231 

15370 : 

15090 : 

15380 DATA 169,144,32,243,154,14,84,17,46,85 

15100 DATA 96,168,201,18,208,4,169,4,208,6, 

,17,14,86,17,46,87,17,162,39,160 

201,146,208,5,169,0,133,243,96,201 

15390 : 

15110 : 

15400 DATA 223,32,243,19,160,239,162,35,32,2 

15120 DATA 145,208,15,56,173,98,17,233,4,141 

43,19,160,37,32,109,157,162,31,32 

,98,17,176,3,206,99,17,96,201,17 

15410 : 

15130 : 

15420 DATA 112,157,141,49,17,140,50,17,162,3 

15140 DATA 208,15,24,173,98,17,105,4,141,98, 

9,160,41,32,124,157,162,33,32,112 

17,144,3,238,99,17,96,41,127,201 

15430 : 

15150 : 

15440 DATA 157,141,51,17,140,52,17,96,169,19 

15160 DATA 32,144,193,152,201,128,176,12,20 

2,32,174,157,157,49,17,152,157,50 

1,96,144,4,41,223,176,8,41,191,144 

15450 : 

15170 s 

ISIRft nöTfl ü /II 1 *77 Q A4 1 A9 ft 1 Aft T 1 1 

15460 DATA 17,96 

08,134,109,6,108,38,109,136,208,249 


15190 : 

Listing 1. Fügen Sie die Basic-Zeilen in das Basic- 

15200 DATA 24,165,108,105,0,133,108,165,109 

Programm »Graphik 80« ein und nehmen Sie bitte 

,166,241,48,3,105,208,44,105,216 

die im Text erwähnten Änderungen vor 


zum Ursprung des gedachten Koordinatensystems) und x„ au 
und y neu die Koordinaten des gedrehten Koordinatensy¬ 
stems, die tatsächlich auf dem Bildschirm erscheinen. Nun 
taucht aber noch ein kleines Problem auf: 

In x-Richtung ist die Auflösung unseres Bildschirms 
wesentlich höher als in y-Richtung, man sieht auch im HiRes- 
Modus die Bildschirmzeilen, aber nicht die -spalten. Deshalb 
müssen noch Korrekturfaktoren eingeführt werden, die dafür 
sorgen, daß dasselbe Wort in y-Richtung genauso lang 
erscheint wie in x-Richtung. Die vollständige Formel lautet 
dann: 

x n8 u = k i -x-cos w + k 2 -y-sin w 
y n8 u = y-cos w - kg-x-sin w 

Als günstigste Werte für die Korrekturfaktoren wurden 
gefunden: 

k, = 1,873; k 2 = 2; k 3 = 0,874. 

Damit erhält man eine im Vergleich zum Textmodus leicht 
vergrößerte Darstellung. Mit k, = 1,126; k 2 = 2 und k 3 = 
0,501 erhält man die Schrift in Originalgröße. In der Praxis (in 
unserem Fall) wird so verfahren, daß zuerst die einfachen 
Koordinaten ohne Drehung berechnet werden, dann die Dre¬ 
hung ausgeführt (im Assemblerlisting »jsr rotate«) und 
schließlich wird der berechnete Punkt eingezeichnet. Der 
beschriebene Algorithmus für die Drehung des Koordinaten¬ 
systems um den Ursprung - zumindest in der allgemeinen 
Fbrm ohne Korrekturfaktoren - ist übrigens nicht nur für Zei¬ 
chendarstellung geeignet, sondern ein allgemeingültiger 
Koordinatentransformations-Aigorithmus. Wer ihn für eigene 
Programme benutzen will, der findet im Assemblerlisting zu 
Character 80 das ohne die anderen Programmteile von Gra¬ 


phik 80 lauffähige Unterprogramm »rotate«. Dort ist die Para¬ 
meterübergabe an das Unterprogramm genau beschrieben. 
Im Assemblerlisting Character 80 ist auch die praktische Pro¬ 
grammierung der gesamten CHAR-Anweisung beschrieben, 
weitere Kommentare sind also wohl nicht mehr nötig. 

Zum Schluß noch ein Tip für experimentierfreudige Assem¬ 
blerprogrammierer: Das Programm ist so geschrieben, daß 
Drehungen der Schrift um beliebige Winkel möglich sind. Lei¬ 
der sind die Schriftzeichen bei einer Auflösung von 8x8 
Punkten bei nicht-rechtwinkligen Drehungen unleserlich. 
Abhilfe könnte hier vielleicht eine Verdopplung der Auflösung 
auf 16 x 16 Punkte schaffen. Im Assemblerlisting müssen zu 
diesem Zweck nur wenige Konstanten geändert werden. Die 
meiste Arbeit ist es aber, einen neuen Zeichensatz mit 32 
Byte pro Zeichen zu entwickeln. Doch nur Mut, wir sind 
gespannt auf Ihre Ergebnisse. Und noch ein Tip: Der Basic- 
Interpreter akzeptiert bei manchen Befehlen außer »absolu¬ 
ten«, kartesischen Koordinaten (x,y) auch Polarkoordinaten 
der Form (r;w). Der Interpreter erkennt Polarkoordinaten 
daran, daß x und y nicht durch ein Komma, sondern durch ein 
Semikolon voneinander getrennt sind. Der Radius r ist die 
Zahl vor dem Semikolon, der Winkel w steht nach dem Semi¬ 
kolon. Die Verfasser haben das folgende Beispiel aus¬ 
probiert: 

10 GRAPHIC 6,1 
20 FOR 1=0 TO 360 
30 DRAW ,320,100 T0 80;I 
40 DRAW 0,320,100 T0 80;I 
50 NEXT I 

60 GRAPHIC 5 (Dieter Winkler/Thomas Rumbach/og) 
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Dieses Programm erweitert »Graphik-80« um die 
wichtige Möglichkeit, von dem 80-Zeichen- HiRes- 
Bildschirm des C128 Hardcopies in verschiede¬ 
nen Größen auf einem Epson FX-80 oder kompati¬ 
blen Drucker ausgeben zu können. Der Drucker 
kann über den seriellen Bus oder über die in die¬ 
ses Programm eingebaute Centronics-Schnitt- 
stelle angesprochen werden. 

W ie mittlerweile allgemein bekannt ist, kann der C128 
auch auf dem 80-Zeichen-Bildschirm hochauflösen¬ 
de Grafik darstellen. Die Auflösung von 640 x 200 
Punkten (Pixel) ist geradezu eine Aufforderung, mit dieser im 
wahrsten Sinne des Wortes hochauflösenden Grafik zu arbei¬ 
ten. Mit dem Programmpaket GRAPHIK-80 wurde es mög¬ 
lich, den 640 x 200 Punkte HiRes-Bildschirm des C128 von 
Basic aus anzusprechen. Trotz der mächtigen Befehle, die 
damit zur Verfügung stehen, fehlt ein Befehl, der es einem 
ermöglicht, seine Kunstwerke zu drucken. Diesem Mißstand 
helfen wir mit dieser Programmerweiterung ab. Das Ergebnis 
unserer Arbeit ist ein Programm (Listing 1), das standard¬ 
mäßig mit den folgenden Druckmodi aufwarten kann: 

1. Ausdruck in einfacher Größe 

2. Ausdruck in einfacher Größe (revers) 

3. Ausdruck in doppelter Größe 

4. Ausdruck in doppelter Größe (revers) 

Andere Bildgrößen und Punktdichten kann sich jeder indivi¬ 
duell in Basic mit Hilfe des Installationsteils des Basic-Laders 
zusammenbasteln. Selbstverständlich ist die Druckausgabe 
mit jeder benötigten Sekundäradresse, mit oder ohne Line- 
Feed (LF) oder auf Wunsch über die eingebaute Centronics- 
Schnittstelle möglich. 

Der maschinennahe Basic- und Assembler-Programmierer 
sieht beim Überfliegen der Assembler-Routinen (Listing 2) 
sehr schnell, daß durch Zufügen von Steuerbytes weit mehr 
als 4 Bildformate (bis 255) vorgewählt werden können. Das 
Programm ist in der Lage, HiRes-Bilder beim Drucken in 
x- und y-Richtung bis zu dem Faktor 3 beziehungsweise 4 zu 
vergrößern. Dies ergibt im Extremfall ein Bild mit über 1,5 Mil¬ 
lionen Pixel auf dem Drucker, die dadurch zustande kommen, 
daß das Bild nicht einfach gedehnt wird, sondern bei gleicher 
Auflösung wie auf dem Bildschirm werden durch geschicktes 
Vervielfachen der einzelnen Pixel mehr Punkte ausgegeben. 

Vor dem eigentlichen Programmstart muß natürlich das 
Programm in den Computer eingetippt werden. Speichern 
Sie das Programm danach. Somit haben Sie immer eine Ur- 
Version, die Sie mit Hilfe des Installationsteils Ihren jeweiligen 
Bedürfnissen anpassen können. 

Starten Sie jetzt das Programm mit RUN. Es erzeugt zuerst 
ein Maschinenprogramm im Speicher und arbeitet anschlie¬ 
ßend den Installationsteil ab. Für diesen Teil benötigt das Pro¬ 
gramm von Ihnen verschiedene Informationen, die es im Dia¬ 
log anfordert. 

Wenn Sie nicht mit der eingebauten Centronics-Schnitt- 
stelle arbeiten, sollten Sie der Wahl der Sekundäradresse 
besondere Bedeutung zukommen lassen. Eine falsche 
Angabe führt im allgemeinen zu »Buchstabensalat mit ASCII- 
Allerlei«. Da dieses »Menü« nur in den seltensten Fällen Lieb¬ 
haber findet, setzen Sie bitte die Sekundäradresse ein, bei 
der Ihr Interface keine Umkodierung der Zeichen (von Com- 
modore nach ASCII) vornimmt. Diese Adresse steht in dem 
Handbuch, das Ihnen mit dem Interface mitgeliefert wurde. 
Anderenfalls müssen Sie etwas experimentieren. Dazu ein 

läJÖi* 


Tip: häufig gebrauchte Sekundäradressen sind 1 (Data 
Becker, Wiesemann etc.) oder 4 und 12 (Görlitz). 

Noch ein kleines Problem kann bei der Druckerinstallation 
auftauchen. Vielleicht stellen Sie beim Probedrucken fest, 
daß Ihr Drucker keinen Papiervorschub (Line-Feed) ausgibt. 

Je nach Einstellung des Druckers und des Interfaces gibt 
Ihr Drucker nämlich automatisch nach jedem Wagenrücklauf 
(Return, CR) ein Line-Feed (LF) aus oder nicht. Es gibt nun 
zwei Möglichkeiten, den Drucker in diesem Fall zum korrek¬ 
ten Zeilenvorschub zu bewegen: 

1. Schalten Sie in Ihrem Drucker den DIP-Schalter ein, der 
einen automatischen Zeilenvorschub nach jedem CR er¬ 
zeugt, oder einfacher, 

2. )wählen Sie im Installationsmenü die Ausgabe von Line- 
Feed. Das Programm sendet dann am Ende jeder Zeile LF 
und CR. 

Wenn Sie mit den von uns eingestellten Werten für die Bild¬ 
größe einverstanden sind, benötigen Sie keine weiteren Ein¬ 
gaben. Die Frage des Programms nach Änderungen dieser 
Art können Sie also verneinen. Das Programm legt daraufhin 
das Maschinenprogramm gebrauchsfertig auf Diskette ab. 
Anderenfalls werden vom Programm weitere Eingaben zur 
Bildskalierung der vier möglichen Druckmodi angefordert, 
bevor es auf Diskette abgelegt wird. Die von uns gewählten 
Bildgrößen geben das Monitorbild fast unverzerrt auf dem 
Drucker wieder. Wenn Sie einen exotischen Monitor verwen¬ 
den, der das Bildverhältnis stark verändert, sollten Sie andere 
Bildskalierungen austesten. 


Die Centronics-Sdinitfstelle 


Noch ein Wort zu Centronics: Diese Schnittstelle besticht 
durch ihre Sicherheit und Übertragungsgeschwindigkeit. Bei 
so großen Datenmengen, wie sie für ein HiRes-Bild benötigt 
werden (etwa 63 bis 250 Blocks auf der Diskette), fällt die 
Übertragungszeit schon deutlich ins Gewicht. Aber keine 
Angst, auch über den seriellen Bus reicht die Zeit für eine 
Hardcopy nicht für eine Kaffeepause! Der Drucker ist so gut 
wie ausgelastet, aber ein zugeschalteter Puffer kann nicht 
gefüllt werden. Anders mit Centronics: Hier kann leicht ein 
Teil des Bildes im Puffer zwischengespeichert werden. Wer 
ein Centronics-Kabel hat und diesen Vorteil ausnutzen 
möchte, sollte auf jeden Fall ein vorhandenes Interface aus¬ 
schalten oder ausbauen. (Für genaue Angaben blättern Sie 
bitte in der Bedienungsanleitung des Druckers beziehungs¬ 
weise Interfaces). Die Anschlußbelegung ist identisch mit der 
Belegung, die im »Komfortablen Treiberprogramm für Centro- 
nics-Drucker« (64’er 7/1984, Seite 110) vorgestellt wurde. 


User-Port-Pin 

Signal 

A 

(GND) 

GND 

B 

(FLAG) 

BUSY 

C 

(DO) 

DATEN 

D 

(Dl) 

DATEN 

E 

(D2) 

DATEN 

F 

(D3) 

DATEN 

H 

(D4) 

DATEN 

J 

(D5) 

DATEN 

K 

(D6) 

DATEN 

L 

(D7) 

DATEN 

M 

(PA2) 

STROBE 
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Bild 1. Beispielausdruck der 640 x 200-Punkte-Grafik 
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Alle Kabel, auch die des seriellen Bus, sollten nur einge¬ 
steckt werden, wenn alle Geräte ausgeschaltet sind. Durch 
diese oft vernachlässigte Regel sind schon viele Bauteile zer¬ 
stört worden. Zwar hält die von uns eingebaute Schnittstelle 
den Ein-/Ausgabe-Port auf Eingabe (der Port ist dann hochoh¬ 
mig; damit wird erreicht, daß möglichst nie zwei niederohmige 
Spannungsquellen aufeinanderstoßen können) und schaltet 
nur in dem Augenblick der Datenausgabe auf Ausgang, aber 
gegen einen Kurzschluß oder sonstige gewaltsame »Mate¬ 
rialtests«, die bei unsachgemäßer Behandlung auftreten, ist 
natürlich auch dieser Schutz machtlos. 

Aufruf des Programms: 

Nachdem das Maschinenprogramm mit 
BLOAD "HARDCOPY-80.M" 

geladen wurde, starten Sie die Druckerausgabe mit 
BANK 0 

SYS DEC ( " F000 *), modus 

Da viele Programmierer jetzt aufstöhnen und »auch auf die¬ 
sem Computer PEEK, POKE und SYS« hören lassen, möch¬ 
ten wir die Wallt des Aufrufes kurz begründen: 

Bei dem Umschreiben von C64-Programmen auf den 
CI28 gelang es uns nicht, den Befehl 

SYS adresse, argumentl, argument2 
zum Laufen zu überreden. Erst ein Blick in das ROM brachte 
die Lösung. Commodore hat auch diesen Befehl überarbeitet 
und leistungsfähiger gemacht. Der komplette, im Handbuch 
nicht vollständig dokumentierte Aufruf lautet jetzt: 

SYS adresse, akku, x-reg, y-reg, prozessorstatus 

Das heißt, der Interpreter übergibt an das aufgerufene 
Maschinenprogramm die Prozessor-Register. Alle Argu¬ 
mente können beliebige Ausdrücke sein. Es muß nur gewähr¬ 
leistet werden, daß das jeweilige Ergebnis zwischen 0 und 
255, bei der Adresse zwischen 0 und 65535 liegt. Anderen¬ 
falls wird ein ILLEGAL QUANTITY ERROR ausgegeben. 

Zum anderen wollten wir Ihnen nicht die Möglichkeit neh¬ 
men, komplette Grafik-Programme zu compilieren und sie 
dadurch noch schneller zu machen. Einbinden in Basic wäre 
zwar auch möglich, aber es ist unwahrscheinlich, daß jeder 
Compiler diesen Fremdbefehl auch verarbeiten kann. Zudem 
würde ein Einbinden die Interpreter-Geschwindigkeit herab¬ 
setzen, da ein weiterer Befehl berücksichtigt werden muß. Im 
Gegensatz dazu benutzen wir mit dem SYS-Aufruf einen auf 


dem C128 standardmäßig implementierten Befehl, der mit 
einem guten Compiler ohne weiteres arbeiten sollte. 

Aus diesem Grund lautet der Aufruf für das Programm wie 
oben bereits gezeigt: 

BANK 0 

SYS DEC("F000"),modus 

Wer * i Angabe in Hex stört, kann natürlich auch mit 

BANK 0 

SYS 61440,modus 

die Hardcopy-Routine starten. 

»modus« ist irgend ein arithmetischer Ausdruck, der einen 
Wert zwischen 1 und 4 liefert. Bei Werten größer als 255 wei¬ 
gert sich der Interpreter die Zahl in eine 8-Bit-Zahl umzurech¬ 
nen, bei allen sonstigen nicht erlaubten Zahlen meldet sich 
das Programm mit ILLEGAL QUANHTY und zwei Piepstönen 
zurück. Die Ausgabe der Fehlermeldung läßt sich durch die 
TRAP-Anweisung abfangen. So ist es möglich, auf Fehler zu 
reagieren, um zum Beispiel vom HiRes- in den Textmodus zu 
schalten. Wird das Programm ordnungsgemäß verlassen, er¬ 
tönt ein Piepston. Auf die Ausgabe einer optischen Meldung 
wurde verzichtet, um damit den HiRes-Bildschirm nicht zu 
zerstören. 

Noch eine Anmerkung zum Schluß: In ausführlichen Tests 
des Programms mit verschiedenen Druckern und Interfaces 
hat sich herausgestellt, daß das Görlitz-Interface VC 2.6 für 
den Epson FX-80 nicht ganz korrekt mit dem Bus des C128 
zusammenarbeitet. Mit diesem Interface konnte zwar die 
unter »1« voreingestellte Bildgröße fehlerfrei ausgegeben 
werden, wählt man aber die unter »3« voreingestellte Bild¬ 
größe, dann geht die Steuercode-Sequenz »ESC * $03 $80 
$07« auf dem Bus verloren. Das Interface scheint hier als 
Aktivfilter zu wirken. Problemlos lief Hardcopy 80 zum Bei¬ 
spiel mit dem Data Becker-Interface VCI 2.8 (Sekundär¬ 
adresse 1). Auch die Centronics-Schnittstelle hat auf keinem 
der bisher getesteten Drucker versagt. Sollte Hardcopy 80 
einmal nicht auf Anhieb funktionieren, dann werfen Sie die 
Flinte nicht gleich ins Korn, probieren Sie verschiedene 
Druckdichten und Sekundäradressen aus; die Mühe lohnt 
sich bestimmt (siehe Bild) und das Ergebnis wird Hindernisse 
auf dem Weg zum Erfolg rasch vergessen lassen. 

(Dieter Winkler/Thomas Rumbach/og) 
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GRAFIK-LISTING 


1 REM " <25SPACE>aARDCOPY-B0 

620 : 

2 : 

630 : 

3 REM "{4SPACEJQASCHINENR0UTINE ZUR AUSGABE 

640 PRINT CLS; TAB(20); "* ±NDERUNG DER 21LD 

DES BÖ-ZEICHEN AIRES-2ILDSCHIRMS DES 

AUSGABEPARAMETER (J/{RVSONJNIRVOFFJ) 

4 REM "dl SPACE >£-128 AUF EINEN £2.-80 ODER K 

650 GET KEY WAS 

OMPATIBLEN 2RUCKER 

660 IF WAS="N" OR WAS=CHRS(13> THEN PRINT "N 

5 : 

EIN": GOTO 1190 

6 REM '■ I2BSPACE >BY {2SPACEJ.K.RJ4 

670 IF WASO”J" THEN 650 

7 : 

680 PRINT "JA" 

B REM " I28SF'ACE>10/1985 

690 PRINT T AB (25) ; QDS; "2RUCKM0DUS CÖ' -> 

9 : 

ANDE DER EINGABEN) "; 

lö : 

700 GET KEY NRS 

11 : 

710 BN=VAL(NRS) 

1ÖÖ FAST : BANK Ö 

720 IF ((BN=0 AND NRS<>"0") OR BN>4) THEN 70 

11Ö QDS=CHRS(17) : REM "£URSOR DOWN 

0 

12Ö CLS=CHRS(147) : REM "2CREEN CLEAR 

730 PRINT NRS 

13Ö : 

740 IF BN=0 THEN 1190 

14Ö PRINT CLS; TAB(3Ö); "AARDCOPY-B0" 

750 CL=PEEK(DEC("F323“)+BN-1) 

150 PRINT TAB(30); QDS; "(C){2SPACEJBY ZÄH" 

760 XF=CL AND 3 

160 PRINT TAB(20); QDS; QDS; "* 2ATAZEILEN L 

770 YF=CL AND 192 

ESEN" 

780 RV=CL AND 32 

170 FOR SP=DEC("F000") TO DEC("F33D") 

790 IF (YF AND 128)=0 THEN BEGIN 

1B0 READ CO: POKE SP,CO 

800 : YF=1 

190 NEXT SP 

810 BEND : ELSE BEGIN 

200 : 

820 : IF (YF AND 64)=0 THEN BEGIN 

210 PRINT TAB(20); QDS; "* ZNSTALLATION“ 

830 : : YF=2 

220 PRINT TAB(25); QDS; "2IE 2RUCKERADRESSE 

840 : BEND : ELSE BEGIN 

IST"; PEEK(DEC("Fl0A")> 

850 : : YF=4 

230 PRINT TAB(25); "2IE SEKUNDFRADRESSE IST" 

860 : BEND 

; PEEK(DEC("F0F7“ >) 

870 BEND 

240 PRINT TAB(25); ".L.INEFEED WIRD ZUM DRUCKE 

880 FX=PEEK(DEC("F31B" ) +BN-1 ) 

R GESANDT: ”; 

890 PRINT TAB(25); QDS; QDS; "2RUCKM0DUS: “; 

250 IF PEEK(DEC ( "F220" ) )=5 THEN PRINT "NEIN" 

BN 

: ELSE PRINT "JA" 

900 PRINT TAB(25); QDS; "HERVIELFACHEN IN X- 

260 PRINT TAB(20); QDS; QDS; “ÄNDERUNGEN GEW 

SICHTUNG: "; XF 

SNSCHT ? < 2SPACE > (J / LRVSON >N tRVOFF > ) ”; 

910 PRINT TAB(25); " HERVIELFACHEN IN Y-SICHT 

270 GET KEY WA* 

UNG: "; YF 

2B0 IF WAS="N" OR WAS=CHRS(13) THEN PRINT "N 

920 PP INT TAB(25); "SEVERSE ON: < 18SPACE>" ; 

EIN": GOTO 640 

930 Ii- RV THEN PRINT "JA": ELSE PRINT "NEIN" 

290 IF WAS< >" J “ THEN 270 

940 PRINT TAB (25) ; " .PUNKTDICHTEC4SPACE > ( • EAC 

300 PRINT “JA" 

* N-) : "; FX 

310 PRINT TAB(20) ; QDS; "EINGABE DER‘BRÜCKER 

950 PRINT TAB(20); QDS; QDS; "NEUE HERVIELFA 

ADRESSE (ODER ’C' FÜR £ENTRONICS> 

CHUNG IN X-SICHTUNG: (1,2,3) "; 

320 INPUT ADS 

960 GET KEY WAS 

330 IF ADSO"C" AND (VAL (ADS) <4 OR VAL ( ADS) > 

970 IF WAS< " 1 " OR WAS>"3" THEN 960 

15) THEN 320 

980 PRINT WAS 

340 IF ADS="C" THEN BEGIN 

990 CL=VAL(WAS) 

350 : POKE DEC ( "F0F7" ) ,255 

1000 PRINT TAB(20) ; "NEUE HERVIELFACHUNG IN 

360 BEND : ELSE BEGIN 

Y-SICHTUNG: (1,2,4) "; 

370 : PRINT TAB(20); "EINGABE DER SEKUNDFRAD 

1010 GET KEY WAS 

RESSE "; 

1020 IF WAS<>"1" AND WAS<>"2" AND WAS<>"4" T 

380 : INPUT SAS 

HEN 1010 

390 : IF VAL(SAS)<0 OR VAL(SAS)>15 THEN 38@ 

1030 PRINT WAS 

400 : POKE DECCF10A") ,VAL(ADS> 

1040 IF WAS="4" THEN CL=CL OR 192 

410 : POKE DEC (" F 0F7 ") ,VAL ( SAS > 

1050 IF WAS="2" THEN CL=CL OR 128 

420 BEND 

1060 PRINT TAB(20) ; "SEVERS (J/N):<30SPACE>” 

430 PRINT TAB(20); "SOLL ÄINEFEED GESENDET W 

5 

ERDEN (J/IRVSONJN{RVOFF> ) "; 

1070 GET KEY WAS 

440 GET KEY WAS 

1080 IF WASO-J” AND WASO"N" THEN 1070 

450 IF WAS="J" THEN BEGIN 

1090 IF WAS="J" THEN CL=CL OR 32: PRINT "JA" 

460 PRINT "JA" 

: ELSE PRINT "NEIN" 

470 POKE DEC ( "F220" ) ,6 

1100 POKE DEC ( "F323" ) +BN-1,CL 

4B0 BEND : ELSE BEGIN 

1110 PRINT TAB(20); "NEUE £UNKTDICHTE FFR £2. 

490 IF WAS< >"N" AND WAS<>CHRS ( 13) THEN 440 

-80:C2SPACEJ(0-7){9SPACE>"; 

500 PRINT "NEIN" 

1120 GET KEY WAS 

510 POKE DEC ( "F220" ) ,5 

1130 IF WAS< " 0" OR WAS>"7" THEN 1120 

520 BEND 

1140 FX=VAL(WAS) 

530 PRINT TAB(20) ; QDS; "ANGABEN RICHTIG ?{2 

1150 POKE DEC (" F31B "> +BN—1,FX 

SPACEJ ( {RVS0N3-J CRVOFFJ/N) "; 

1160 PRINT FX 

540 GET KEY WAS 

1170 GOTO 690 

550 IF WAS=CHRS(13) OR WAS="J" THEN PRINT “J 

1180 : 

A“: GOTO 640 

1190 PRINT TAB(20); QDS; QDS; "* flBSPEICHERN 

560 IF WAS="N" THEN BEGIN 

DER flASCHINENROUTINE“ 

570 : PRINT "NEIN" 

1200 PRINT TAB(20); QDS; "2ITTE 2ISKETTE IN 

580 : GOTO 220 

.LAUFWERK 8 EINLEGEN (.ms.TE.) " 

590 BEND : ELSE BEGIN 

1210 GET KEY WAS 

600 : GOTO 540 

610 BEND 

Listing 1. »Hardcopy 80« 
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1220 SCRATCH "HARDCOPY—80.M" 

2480 : 

1230 IF DS>1 THEN PRINT DSS: STOP 

2490 DATA 243,62,56,244,46,62,243,44,63,243, 

1240 BSAVE "HARDCOPY—80.M“,U3,0N B0.P(DEC("F 

48,24,62,136,244,46,62,243,62,216 

000"> > TO P(DEC("F33E")) 

2500 : 

1250 IF DS THEN PRINT DSS 

2510 DATA 244,46,62,243,62,40,245,46,62,243, 

1260 : 

62,120,245,46,62,243,173,62,243 

2000 : 

2520 : 

2010 DATA 141,67,243,32,204,24?,162,22,189,3 

2530 DATA 32,58,242,136,208,182,232,224,80, 

9,243,157,0,12,202,16,247,174,67 

208,175,206,66,243,240,6,32,31,242 

2020 : 

2540 : 

2030 DATA 243,240,4,224,5;144,87,162,204,142 

2550 DATA 76,68,241,169,204,141,13,12,169,2 

,13,12,162,255,142,14,12,32,0,12 

55,141,14,12,32,0,12,24,76,65,240 

2040 : 

2560 : 

2050 DATA 169,7,162,210,142,13,12,162,255,14 

2570 DATA 160,5,140,71,243,172,71,243,185,51 

2,14,12,32,0,12,162,0,160,0,136 

,242,32,123,242,206,71,243,16,242 

2060 : 

2580 : 

2070 DATA 208,253,202,208,250,56,8,169,7,162 

2590 DATA 96,0,0,0,42,27,13,10,142,67,243,1 

,210,142,13,12,162,255,142,14,12 

40,68,243,44,63,243,16,11,170,112 

2080 s 

2600 : 

2090 DATA 32,0,12,169,4,162,195,142,13,12,1 

2610 DATA 5,189,7,243,80,3,189,23,243,141, 

62,255,142,14,12,32,0,12,40,176 

62,243,173,63,243,72,41,3,141,70 

2100 : 

2620 : 

2110 DATA 1,96,162,40,160,125,142,13,12,14 

2630 DATA 243,104,41,32,240,8,173,62,243,73, 

0,14,12,76,0,12,202,189,31,243,72 

255,141,62,243,173,62,243,32,123 

2120 : 

2640 : 

2130 DATA 189,27,243,141,53,242,189,35,243,1 

2650 DATA 242,206,70,243,208,245,174,67,243, 

41,63,243,41,3,170,160,128,169 

172,68,243,96,72,173,69,243,201 

2140 : 

2660 s 

2150 DATA 2,140,52,242,141,51,242,202,240, 

2670 DATA 255,240,14,169,210,141,13,12,169,2 

19,24,152,109,52,242,141,52,242,173 

55,141,14,12,104,76,0,12,162,3 

2160 : 

2680 : 

2170 DATA 51,242,105,2,141,51,242,202,208,2 

2690 DATA 160,221,32,247,242,104,162,1,160,2 

37,160,160,169,0,140,73,241,141 

21,32,247,242,162,13,160,221,32 

2180 : 

2700 : 

2190 DATA 81,241,162,100,142,66,243,44,63,2 

2710 DATA 231,242,162,0,160,221,32,231,242,4 

43,8,16,2,112,9,78,66,243,14,73 

1,251,32,251,242,9,4,32,251,242 

2200 : 

2720 : 

2210 DATA 241,46,81,241,40,48,9,78,66,243,14 

27.3? DATA 162,13,160,221,32,231,242,41,16,24 

,73,241,46,81,241,172,73,241,173 

0,245,169,0,162,3,160,221,76,247 

2220 : 

2740 : 

2230 DATA 81,241,140,96,241,141,98,241,169, 

2750 DATA 242,32,195,242,162,2,160,221,32,23 

0,141,64,243,141,65,243,169,0,162 

1,242,9,4,32,251,242,162,0,160 

2240 : 

2760 : 

2250 DATA 189,142,13,12,162,255,142,14,12,32 

2770 DATA 221,32,231,242,9,4,76,251,242,134, 

,0,12,169,4,160,12,140,69,243,192 

252,132,253,160,0,162,252,142,170 

2260 : 

2780 : 

2270 DATA 255,240,49,162,186,142,13,12,162,2 

2790 DATA 2,162,0,76,162,2,134,252,132,253 

55,142,14,12,162,5,32,0,12,162 

,160,0,162,252,142,185,2,162,0,76 

2280 : 

2800 : 

2290 DATA 192,142,13,12,162,255,142,14,12,32 

2810 DATA 175,2,0,3,12,15,48,51,60,63,192,19 

,0,12,144,4,104,76,26,240,162,4 

5,204,207,240,243,252,255,0,15 

2300 : 

2820 : 

2310 DATA 169,201,141,13,12,169,255,141,14,1 

2830 DATA 240,255,7,7,3,3,23,23,23,23,1,33,1 

2,32,0,12,169,27,32,123,242,169 

31,163,72,173,0,255,133,254,169,0 

2320 : 

2840 : 

2330 DATA 51,32,123,242,104,32,123,242,32,3 

2850 DATA 141,0,255,104,32,255,255,72,165,25 

1,242,76,85,241,24,173,64,243,105 

4,141,0,255,104,96 

2340 : 

2860 : 

2350 DATA 0,141,64,243,173,65,243,105,0,14 

2870 END 

1,65,243,169,72,162,243,141,147,241 

2880 : 

2360 : 

60000 ZZS="HARDCOPY-80": UN=8 

2370 DATA 142,148,241,169,0,160,0,141,70,243 

60010 OPEN 15,UN,15,"S0:"+ZZ* 

,140,71,243,162,18,173,65,243,160 

60020 GOSUB 60100 

2380 r 

60030 SAVE ZZS,UN 

2390 DATA 204,140,13,12,160,205,140,14,12,32 

60040 SOSUB 60100 

,0,12,162,19,173,64,243,32,0,12 

60050 VERIFY ZZS,UN 

2400 : 

60060 CLOSE 15 

2410 DATA 162,31,160,218,140,13,12,160,205,1 

60070 END 

40,14,12,32,0,12,141,255,255,238 

60080 : 

2420 : 

60100 INPUT#15, Sl, SS, S2, S3 

2430 DATA 147,241,208,3,238,148,241,56,173,7 

60110 IF Sl=l THEN PRINT S2; SS 

0,243,233,1,141,70,243,173,71,243 

60120 IF Sl<20 THEN RETURN 

2440 : 

60130 PRINT Sl ", " SS "," S2; "," S3 

2450 DATA 233,0,141,71,243,176,223,162,0,160 

60140 CLOSE 15 

,8,169,0,141,62,243,62,72,243,46 


2460 : 


2470 DATA 62,243,62,152,243,46,62,243,44,63 

Listing 1. »Hardcopy 80«-Programm zum Ausdrucken 

,243,16,2,112,41,62,232,243,46,62 

der 640 x 200-Punkte-Grafik auf dem C128 
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C 128 


GRAFIK-LISTING 


1 rem " 



Hardcopy—80 


1780 ~ 

•ty copyl*1 


2 i 





1790 - 

sta copyh*1 


3 rem " 


Routine 

er«tollt Hlre«-Bl1dor auf FX-B0 


1800 * 

ldx #100 i 

"max. Anzahl dor Druckerzei1en 

4 i 





1810 ' 


“ln Zaehler 

3 rem " 



by rRW 


1820 ~ 

bit «lauer 


6 i 





1030 * 

Php 


7 rem " 



1983 


1040 ~ 

bpi lnlt31 | 

“keine Vervielfachung 

8 I 





1830 " 

bvs lnit4 | 

"vi -> y-v#2 

9 rem " 



Version 1.4 


1060 lnltSl 

1 »r anzzel | 

"Zellen /2 

10 i 





1070 Ä 

asl copyl*1 | 

"Anzahl #2 

11 i 





1880 ' 

rol copyh*I 


30 zzf-"hardcopy-B0.m- 



1890 Inlt4 

Plp 


60 open 13,8, 

3• ”o0x 



1900 ** 

bei initS | 

"n»l -> y»y#2#2 

70 goaub 60100 



1910 * 

l«r anzzel 

00 open 2,0 

2 

ZXf*" ,p,w“ 



1920 * 

a«l copyl*1 


90 gnsub 60100 



1930 * 

rol copyh*1 


100 ■ 





1940 lnitS 

ldy copyl*1 j 

"errechnet* Anzahl ln Z#hl*r uebornehmen 

110 mym 9*4096 



1930 - 

lda copyh*1 


120 .opt o2 





1960 ' 

«ty count1*1 


130 , 





1970 ** 

«ta counth*1 


140 [ "••• »ooetanto 



1900 * 

lda #0 


130 | 





1990 ' 

ata «erpnt j 

"Dildschirmzeigor auf Anfang Bildschirm 

160 nrcnd 

• 

4 

1 -Anzahl der Bofehle 


2000 ' 

•ta »crpnt*l 

170 bei1 

■ 

7 

1 "Klingelzeichen 


2010 •* 

lda #0 | 

"Druckerkanal öffnen 

100 1« 

■ 

10 

1 "Llnofocd 


2020 •* 

ldx #< sotnam j 

“L4nge de« Namen - 0 

190 er 

• 

13 

1 "Return 


2030 * 

»tx f0c0d 

200 dcc 

■ 

27 

1 "Escape 


2040 A 

ldx #>«etnae 


210 fa 

» 

4 

I "GerateadresBo de« Drucker« 


2030 ' 

■tx f0c0e 


220 BA 

• 

12 

1 "Sekundäradresae dos Drucker« 


2060 * 

J«r fQc00 


230 | 





2070 * 

lda #4 | 

"logische Fllenummer (la) 

240 ; "eee Speicher«tellen 

•••“ 


2080 ' 

ldy #t.a j 

"Sekunderadrec«e l«a) 

230 | 





2090 * 

■ty «ekadr 


260 savadr 

■ 

ffc 

I "Adroosuborgabo (2 Byte) 


2100 * 

cpy 1944 , 

"Centronics 7 

270 «avenfg 

■ 

ff* 

j "MMU-Regl«terzwi schenspelcher 


2110 ** 

beq in2 i 

“Je -> kein File auf «eriellen Bus offnen 

200 ldpnt 

■ 

$02aa 



2120 - 

ldx #<«etlf« 


290 «tpnt 

- 

f02b9 



2130 ~ 

«tx #0c0d 


300 » 





2140 ' 

ldx #>«etlf« 


310 | "••• Karmlroutlnnn < 

•#“ 


2130 * 

»tx f0c0o 


320 , 





2160 ' 

ldx #fa j 

-Qerateadr*««* (fa> 

330 «otnam 

• 

ff fbd 



2170 Ä 

J«r f0c00 


340 setl 4% 

- 

fffba 



2180 * 

ldx #<open i 

“File Offnen 

330 open 

- 

fffcO 



2190 ~ 

•tx #0C0d 


360 c1oso 

• 

fffc3 



2200 •* 



370 clrchn 

■ 

fffee 



2210 Ä 

•tx «0c0o 


380 chkout 

- 

fffc9 



2220 ' 

J«r f0c CO 


390 chrout 

■ 

fffd2 



2230 ' 

bcc lnl2 j 

“Fehler bol OPEN aufgetroten -> Abbruch 

400 , 





2240 * 

pla j 

“Papiervorschubsteuerung vom Stack 

410 quant 

• 

f 7d2B 



2230 ^ 

jmp error 


420 ; 





2260 ; 



430 ldfar 

- 

f 02a2 

1 "von anderer Bank ladon 


2270 inl2 

ldx #4 J 

"Ausgabe auf Drucker umlenken 

440 «tfar 

- 

f02af 

; "ln andere Dank «polehern 


22B0 ' 

lda #<chkout 

450 j 





2290 Ä 

«ta S0c0d 


900 ff000 




2300 * 

lda «>chkout 


990 | 





2310 ~ 

ata S0c0c 


1000 init 


sta savx 

; "gewünschten Modus Zwischenspeichern 


2320 ~ 

J*r f0c00 


1010 ~ 


Jsr Incent 

; “Initialisierung der Centronics«chmtt«t*ll* 


2330 in2 

lda «esc j 

"Druckervorschub elnstellen 

1020 ** 


ldx #ondfar-jsfar 


2340 - 

J»r aufbus 


1030 copyf ar 

1 da jsfar.x 

; “Sprungroutlno ln gemeinsamen 


2350 * 

lda #"3" j 

"Vorschub ■ nn/216 Zoll 

1040 - 


cta fecC8 ,ii 

! "Speicherbereich kopieren 


2360 Ä 

Jsr aufbu« 


1030 ' 


dCK 



2370 Ä 

pla 


1060 ~ 


bpi copyfar 



2360 * 

jsr aufbus ; 

"nn ausgeben 

1070 ' 


ldx savx 

; "Modus zuruckholen 


2390 - 

jsr drucker j 

"Drucker in Bitmode schalten 

1000 - 


beq error 

1 “-0 -> Fehler 


2400 ' 

jep copyl 


1090 - 


cpx #nrcmd*l 

; "Anzahl der Druckmodi*1 


2410 ; 



00 ~ 

10 error 


bcc inltl 
ldx #<clrchn 

I "kleiner -> erlaubt 
! “I/O auf Standard 

O 

2420 copy 

2450 - 

clc ; 

lda serpnt 

“Zeiger für Bi 1dschirmram erhöhen 

20 Ä 
:30 Ä 


stx f0c0d 
ldn f>clrchn 

ade #00 ; 

«ta «erpnt 

“wird bei mit eingesetzt 

:40 ~ 


stx f0c0e 



2460 ' 



i50 Ä 


Jsr tBc00 



2470 copyh 

ade #00 


160 Ä 


1 da «bol 1 

; “2* Bell -> Fehler 


2480 - 

•ta scrpnt*l 


170 Ä 


ldx #<ehrout 

I “1# Bell -> Ende OK 


2490 copyl 

lda #<buffer ; 

"Zeiger auf Anfang des Buffers 

180 ~ 


stx fEcBd 



2500 ' 

ldx #>buffer 


190 ** 


ldx *>chrout 



2510 ** 

«ta bufpnt*l 


200 ~ 


st« f0c0e 



2520 ' 

stx bufpnt*2 


210 Ä 


jsr f0cC0 



2530 count1 

lda #400 | 

“Anzahl der Bytes (low Byte) 

220 - 


ldx «0 

; -Warteochlelfe für Piepton 


2540 counth 

ldy #*00 j 

“Anzahl der Bytes (High Byte) 

230 ' 


ldy #0 



2550 * 

sta counter 

240 orrl 


doy 



2560 - 

«ty counter*! 


250 Ä 


bne err1 



2570 | 



260 ** 


de« 



75B0 i "••• 

Byte» au« Bi 1dschirmspeieher in« RAM kopieren •••- 

270 ~ 


bne orrl 



2590 t 



200 Ä 


HOC 

1 "Fehler 


2600 •* 

ldx «10 


290 ende 


php 

1 “Einsprung zum Boenden dor Routine 


2610 ** 

lda «crpnt*l | 

“Blldschlrm-RAM-Adresse (High Byte) 

300 ~ 


1 da «bell 



2620 Ä 

ldy #<fcdcc 

.310 Ä 


ldx #<chrout 



2630 - 

•ty fOcOd 


320 Ä 


st. *0c0d 



2640 ** 

ldy «>flcdcc 


1330 ' 


ldx #>chrout 



2650 - 

•ty fOcBo 


1340 - 


•tx *0c0e 



2660 - 

J«r f0c00 


1330 Ä 


Jsr *0c00 



2670 ** 

ldx *19 


1360 Ä 


lda #4 

1 “Druckerfile «Chilenen 


2680 ' 

lda «erpnt | 

"Blldschirm-RAM-Adresse (Low Byte) 

1370 - 


ldx #<clo*e 

1 “und zuruck in* BASIC 


2690 * 

J«r *0c00 

1300 


•tx f0c0d 



2700 ** 

ldx #31 


1390 ' 


ldx •>c1ose 



2710 Ä 

ldy #<fcdda 


1400 ' 


■tx *0c0« 



2720 Ä 

•ty f0c0d 


1410 - 


J«r «0cB0 



2730 - 

ldy #>*cdda 


1420 Ä 


plp 

1 "Fehleratatu« vom Stack holen 


2740 - 

«ty fOcOe 


1430 ~ 


bca ondel 

1 "Fehlerabbruch 


2750 copy? 

J»r *0c00 j 

"Byte holen 

1440 - 


rt« 

j "fehlerfrei 


2760 bufpnt 

■ta 94444 | 

"und ins RAM speichern (Adresse wird eingesetzt) 

1430 | 





2770 ** 

Inc bufpnt*1 

1460 ondel 


ldx #<quant 

1 "Illegal QuantIty 


2780 * 

bne copy3 


1470 ~ 


ldy #>quant 



2790 * 

inc bufpnt*? 


1400 ~ 


•tx fBcOd 



«800 copy3 

sec | 

"Z*hler herrunter14h1 an 

1490 ~ 


•ty fOcOe 



2010 * 

lda counter 


1300 « 


Imp f0C00 



2020 ' 

•bc #1 


1310 | 




2830 * 

«ta counter 


1320 mltl 


dex 

I -x als Zeiger ln Tabellen 


2040 - 

lda counter*! 


1330 - 


lda prtvor.x 

1 -Papiervorachub de« Drucker« 


2030 * 

»bc #0 


1340 " 


pha 

1 “rett«n 


2060 ** 

•ta counter*l 


1330 - 


lda prtctl,x 

1 “Druckerateuerung 


2870 " 

bc« copy2 


1560 ' 


•ta prtcndl 



2080 | 



1370 ^ 


lda Ctrl,x 

1 "Pr ogrammsteuerbyte 


2090 | "••• 

In« RAM kopierte 

Bytes verarbeiten •••“ 

1300 ' 


■ta «teuer 



2900 | 



1390 ' 


and #7.00000011 i -au« x-Vervielfachung Anzahl 


2910 - 

ldx *0 | 

"Byte ln dor aktuellen Zelle 

1600 - 


tax 

1 “der zu Uebertragenden Byte« pro Zeile errechne 


2920 prl 

ldy #0 

“0 Bit pro Byte 

1610 Ä 


ldy #<640 

I "Wert fuer keine Vervlelfachung 


2930 pr2 

lda #0 ; 

"Data loschen 

1620 ~ 


lda #>640 



2940 ' 

■ta data 


1630 - 


•ty prtemd*! 



2930 Ä 

rol roMl.x 


1640 Ä 


■ta prtemd 



2960 '• 

rol data 


1630 " 


dex 



2970 ^ 

rol row?,x 


1660 ~ 


beq Inlt3 

; "keine Vervlelfachung 


2900 ~ 

rol data 


1670 lnit2 


clc 

; “mal Vervielfachung 


2990 - 

blt «teuer | 

"vervielfachen 7 

1680 ” 


tya 

1 “Low-Byte 


3000 - 

bpi pr3 

"keine Vergroflerung in y-Rlchtung 

1690 - 


ade prtemd*! 



3010 Ä 

bv« out | 

"•4 

1700 ~ 


■ta prtemd*1 



3020 pr3 

rol row3,x 


1710 ^ 


lda prtemd 



3030 - 

rol data 


1720 Ä 


ade #>640 



3040 - 

rol row4,x 


1730 ~ 


■ta prtemd 



3050 ~ 

rol data 


1740 ' 


dex 



3060 ' 

blt »teuer 


1730 ~ 


bne lnlt2 



3070 ~ 

bol out | 

“#2 

1760 inlt3 


ldy #<160 

1 "au» y-Vervielfachung Anzahl 


3080 * 

rol rowS,x 


1770 Ä 


lda #>160 

1 "der zu kopierenden Byte« errechnen 


3090 * 

rol data 
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0128 


3100 

- 

rol row6,* 


4440 

* 


Jmp ldfar 



3110 

** 

rol data 


4450 

1 




3120 


rol r om7,n 


4460 

, "eee 

in andere Bank speichern •*•“ 


3130 


rol data 


4470 






3140 


rol row6 f m 


44B0 

lndst 


st* savadr 



3150 


rol data 


4490 



sty savadr*1 



3160 

out 

lda data | 

“fertiges Byte laden 

4500 

lndst1 


ldy 9(00 



3170 

** 

Jsr ausgabe | 

“Bits verarbeiten und ausgeban 

4510 



ld* 9savadr 



3180 


dey | 

■nächstes Bit 

4520 



st* stpnt 



3190 


bne pr2 i 

“Byte noch nicht fertig 

4530 

*• 


ld* 9(00 i 

-Bank 15 b 1/0 oinblenden 

3200 


ln* | 

-nächste« Byt« ln dieser Zeile 

4540 

** 


jmp stfar 



3210 

** 

cp* 980 | 

“alle 80 Byte dieser Zelle fertig 7 

4550 

1 





3220 

n 

bne prl j 

“nein 

4560 

1 »••• 

Tabellen •*•" 



3230 


dec anzzel > 

■ja -> Zeilenzähler erniedrigen 

4570 

t 





3240 


beq spal 1 

■• 0 -> fertig 

4580 

doppel 


.byt X00000000, 

7.00000011 , X00001 100 

7.00001111 

3250 


Jsr drucker | 

“sonst Druckar für neue Zelle anwelsan 

4590 

** 


.byt 7.00110000, 

7.00110011, X001U1O0 

X00111111 

3260 


Jap copy | 

“neue Zelle bearbeiten 

4600 

** 


•byt XI1000000, 

XI1000011, XI1001100 

XI1001111 

3270 

1 



4610 

« 


.byt XI1110000, 

XI1 110011, X1U11100 

Xllllllll 

3280 

spal 

lda 0<clrchn 


4620 

1 





3290 


sta (0c Bd 


4630 

vier 


.byt XO00O0000, 

7.00001111, XI1110000 

Xllllllll 

3300 


lda 9>clrchn 


4640 

1 





3310 

* 

sta (0c0e 


4650 

prtctl 


.byt 7, 7 



3320 


Jsr *0c00 


4660 

* 


•byt 3, 3 



3330 


ClC 1 

“Ende fehlerfrei 

4670 

1 




3340 

** 

Jap ende 


4600 

prtvor 


.byt 23, 23 



3350 

1 



4690 

** 


•byt 23, 23 



3360 

1 "••• 

Druckeransteuerung 

4700 

1 





3370 

1 



4710 

Ctrl 


.byt X00OOOO01, 

7.00100001 


3380 

drucker 

ldy *5 | 

“Anzahl dar Bafehlbytas 

4720 

«* 


.byt X100000U, 

X1010O0U 


3390 


sty countar*1 


4730 

1 




3400 

drl 

ldy countar*! 


4740 

i “Erklärung der Steuerbits (Ctrl-Tabel I e> 


3410 

** 

lda prtcmd.y 


4750 

1 





3420 


Jsr aufbua | 

■an Drucker senden 

4760 

1" blt 

7 

■ 0 t normal 



3430 


dac countar*! 


4770 



• 1 i vervielfachen in y-Rlchtung 


3440 


bpi drl 


4780 

r blt 

6 

■ 0 i y«y*2 (nur gUltlg wenn blt 7 

- 1) 

3450 

** 

rta 


4790 

1“ 


- 1 i y-y*4 (nur gültig wenn blt 7 

- 1) • 

3460 

1 



4800 

1“ blt 

5 

■ 0 i normal 



3470 

prtemd 

.byt 0. 0 | 

■Anzahl Punkte pro Zelle (wird eingesetzt) 

4810 

1" 


■ 1 l reverse 



3480 

prtcadl 

.byt 0, es 

, er, lf| "Druckmodus (wird eingesetzt) 

4820 

»“ blt 

0/1 i vervielfachen ln * (0 bl« 3 malt 0 - kel 

3490 

1 



4830 

l 





3500 

1 "••• 

flusgabensteuerung 

•••“ 

4840 

1 


sr far (wird nach (0c00 verschoben) 

►99" 

3510 

1 



4850 

t 





3520 

ausgabe 

st* sav* | 

■* retten 

4860 

Jsfar 


pha 



3530 


sty savy | 

■y retten 

4870 



lda (ff00 | 

“aktuelle Konflguratlon retten 

3540 


blt «teuer 


4880 

* 


ata savenfg 



3550 

** 

bpi aus2 | 

■kein Vervielfachen ln y-Richtung 

4B90 



lda 9*00 | 

"Bank 15 li 1/0 einblenden 

3560 

** 

ta* 

4900 

*• 


sta (ff00 



3570 


bvs ausl 


4910 

* 


pla 



3580 


lda doppel,* | 

■y-y»2 

4920 

* 


Jsr »ffff | 

■wird Uberschrieben 


3590 

** 

bvc aus2 | 

"unbedingter Sprung 

4930 

'* 


pha 



3600 

1 



4940 



lda savenfg | 

■alte Konflguratlon wlederherst 

3610 

ausl 

lda vier,* j 

“y-yaä 

4950 

* 


sta (ff00 



3620 

aus2 

sta data | 

“Byte Zwischenspeichern 

4960 

- 


Pi« 



3630 


lda Stauer 


4970 

endfar 


rt« 



3640 


pha 


4980 

1 





3650 

■** 

and 9X00000011 

“Vervielfachung in n-Richtung 

4990 

data 


**1 



3660 


sta counter | 

“als Zähler 

5000 

Stauer 


•- **1 | 

“Kontrollwort 


3670 


pla 


5010 

serpnt 


**2 | 

“Blldschlrmzeiger 


3680 


and 9X00100000 

"REVERSE 

5020 

anzzel 


— **1 1 

"Anzahl der Blldschlrmzeilen 


3710 - 
3720 • 
3730 i 
3740 ' 
3750 • 
3760 ' 
3770 ■ 
3780 ‘ 
3790 * 
3B00 : 
3810 i 
3820 : 


ld« d«ta 
•or 9*ff 
■ta data 

lda data 
Jsr aufbus 
dec countar 
bna «ub3 
ldn lav. 
ldy savy 
rt« 


■an Druckar 


I "Register zurückspeicheri 


1HW c SS:-' 


"••« Byte ausgeban (seriell/Centronics) 


3830 aufbus 

pha 


3840 ~ 

lda sekadr | 

"Centronics 7 

3850 A 

emp 9(ff 


3860 - 

beq auf 1 | 

"J* 

3870 ~ 

lda 9<chrout 


3880 - 

sta (0cOd 


3890 ~ 

lda 9>chrout 


3900 * 

«ta (OcOa 


3910 - 

pla | 

"Byte zurUckholen 

3920 Ä 

jmp (0c00 | 

"und ausgeben (seriell) 

3930 | 

3940 auf 1 

ld* 0<(dd03 I 

“DDRB auf Ausgabe 

3950 Ä 

ldy 9XddQ3 


3960 - 

jsr lndst 


3970 ~ 

pla | 

“Byte zuruckholen 

3980 ~ 

ld* 9<(dd01 | 

“PRB 

3990 Ä 

ldy dXddOl 


4C00 ~ 

Jsr lndst 


4010 Ä 

ld* 9 < (ddOd | 

"IRQ loschen 

4020 ~ 

ldy 9>«dd0d 


4030 Ä 

Jsr indld 


4040 - 

ld* 9<*dd00 | 

"Strobe 

4050 Ä 

ldy 9XddO0 


4060 Ä 

Jsr indld 


4070 ~ 

and 9«fb 


40B0 ~ 

Jsr lndst1 


4090 ~ 

ora 9904 


4100 - 

jsr indst1 


4110 auf2 

ld* 9<(dd0d | 

"auf Druckerantwort warten 

4120 ~ 

ldy BXddBd 


4130 ** 

Jsr lndld 


4140 - 

and 9(10 


4150 ^ 

bsq auf2 


4160 initcla 

lda 90 | 

"DDRB (sicherheitshalber) auf Eingang 

4170 - 

ld* 9<(dd03 

4180 ~ 

ldy 9XddD3 


4190 - 

Jap lndst 


42M | 

4210 1 “••• 

Xnit Centronics 

4220 i 

4230 Incent 

Jsr initcla | 

"Centronics Initialisieren 

4240 - 

ld* 9<(dd02 


4250 * 

ldy 9Xdd02 


4260 - 

Jsr indld | 

"Strobebit 

4270 " 

ora 97.00000100 

I "auf Ausgabe 

42B0 “ 

jsr lndstl 


4790 - 

ld* «<4ddO0 


4300 * 

ldy 9>tdd00 


4310 - 

jsr lndld | 

"Strobepegel 

4320 ~ 

ora 97.03000100 

) “auf high 

4330 - 

jmp lndstl 


4340 i 

4350 | 

4360 | "*** 


laden •*•“ 

4370 | 

4380 lndld 

st* savadr 


4390 ~ 

sty savadr*! 


4400 indldl 

ldy 9»00 '>/> 

4410 - 

ld* 9savadr 


4420 ** 

st* ldpnt 


4430 Ä 

ld* 9(00 

"Bank 15 1. I/O «Inblenden 


i ■ kein Ausdruck) 


5040 savy 
5050 sakadr 
5060 countar 
5070 buffer 
5080 rowl 


•- **1 

**2 


"Zwischenspeicher fuar y-Ragister 

"Sekundäradresse 

■Zähler fuar verschiedene Zwecke 


- buffar ♦ (0*B0) 

- buffar ♦ (1*80) 

- buffar * (2*80) 

- buffar ♦ <3*B2) 

- buffer * (4*80) 

- buffer ♦ (5*80) 

- buffar ♦ (6*80) 

- buffer * (7*80) 


5110 row4 
5120 row5 
5130 row6 
5140 row7 
5150 rowB 
5160 | 

59980 .and 
59990 and 

60000 ;z*-"hardcopy-B0.a"i un-B 
60010 open 13,un,15,-s0t"*zz( 
60020 gosub 60100 

60030 save zzS.un 
60040 gosub 60100 
60050 verlfy zz(,un 
60060 close 15 
60070 and 


60100 inputälS, sl, «(. s2, s3 
60110 If sl-1 then prlnt s2; s( 
60120 lf al<20 then raturn 
60130 print sl ", ■ «( s2| ■ 

60140 close 15 
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C 128 


TIPS&TRICKS 


Kochrezepte: Kemel- 
Routinen für jeden Zweck 


Um komfortabel und schnell Programme in 
Assembler zu schreiben, müssen Sie sich im 
Betriebssystem auskennen. Wir zeigen Ihnen, wo 
die wichtigen Routinen liegen und wie man sie 
anwendet. 

W enn Sie häufig Programme in Assembler schreiben, 
ist die im CI28 integrierte Software wie Betriebs¬ 
system und Basic-Interpreter für die eigene Pro¬ 
grammentwicklung sehr hilfreich. So gut wie alle Routinen 
lassen sich von eigenen Maschinenprogrammen aus nutzen. 
Aber wie? Wie werden die Routinen aufgerufen, welche Para¬ 
meter müssen ihnen übergeben werden, wie werden sie 
angewendet...? Die offenen Fragen, die auf den Programmie¬ 
rer zukommen, wachsen schnell ins Uferlose. Damit Sie nicht 
enttäuscht den CI28 in die Ecke stellen oder nur noch in 
Basic programmieren, geben wir Ihnen wertvolle Tips und 
Tricks, die Ihnen beim Programmieren in Assembler helfen. 

Der Bildschirm-Editor 


Um Programme oder Daten komfortabel eingeben zu kön¬ 
nen, enthält das Betriebssystem des C128 einen Bildschirm- 
Editor, der - im Gegensatz zu vielen anderen Mikrocompu¬ 
tern - ein sogenannter »Fullscreen-Editor« ist. Dieser Typ 
eines Bildschirm-Editors erlaubt es dem Anwender, sich mit 
dem Cursor völlig frei auf dem Bildschirm zu bewegen, hier 
und dort Änderungen am Programm vorzunehmen, die beim 
Drücken der < RETURN >- beziehungsweise < ENTER >- 
Taste sofort ausgeführt werden. 

Das Gegenstück hierzu, der sogenannte »Line-Editor«, 
erlaubt Cursor-Bewegungen und damit auch Änderungen 
nur innerhalb der aktuellen Bildschirmzeile. Basic-Programm- 
zeilen, die geändert werden sollen, müssen hier zum Beispiel 
mit einer Art EDIT-Befehl extra aufgerufen werden, um dann 
einzeln bearbeitet werden zu können. 

Vom Basic-Interpreter oder vom Betriebssystem her 
beschränken sich die Funktionen des Editors im wesentli¬ 
chen auf zwei Funktionen: Das Einlesen von Zeichen über die 
Tastatur und das Ausgeben von Zeichen auf dem Bildschirm. 
Hinzu kommen beim CI28 noch einige Funktionen, die zum 
Beispiel Biidschirmfenster setzen und ähnliches. 

Der Aufruf der Editor-Funktionen erfolgt über eine Sprung¬ 
leiste. Unter einer Sprungleiste ist eine Reihe von JUMP- 
Befehlen zu verstehen, die ihrerseits zu den eigentlichen 
Arbeitsroutinen springen. Hier werden Sie sich fragen, wozu 
solch eine Sprungleiste nützlich ist. Auf den ersten Blick stellt 
sie doch lediglich eine gewisse Platzverschwendung und, 
gerade bei zeitkritischen Programmen, eine Verlängerung 
der Befehls-Ausführungszeit dar. 

Der Grund ist eigentlich ganz einfach. Auch Betriebs¬ 
systeme sind Programme, und für Programme gilt der schöne 
Satz: Ein Programm ist nie fehlerfrei; es sei denn, es ist ver¬ 
altet. 

Während der Programmierung eines doch recht umfangrei¬ 
chen Betriebssystems treten immer wieder Fehler zutage, 
die eine Änderung am Programm erfordern. Hiermit geht aber 
leider auch eine gewisse Verschiebung der Programmrou¬ 


tinen einher, womit ebenfalls alle Programme zu ändern 
wären, die auf das Betriebssystem oder, in diesem Fall den 
Editor, zugreifen. 

Bei Verwendung einer Sprungleiste ist man dieser Arbeiten 
enthoben, da die Adresse der Funktion innerhalb der Sprung¬ 
leiste immer gleich bleibt. Nur die JUMP-Befehle zeigen jetzt 
unter Umständen auf andere Adressen. 

An dieser Stelle sollen die wichtigsten Routinen des 
Betriebssystem kurz erläutert werden, um aufzuzeigen, wie 
der Assembler-Programmierer diese Routinen sinnvoll ver¬ 
wenden kann. 

Weiterhin wollen wir ein wenig unsere Trickkiste öffnen und 
- gerade am noch recht unbekannten C128 - ein paar Tricks 
und Kniffe zeigen. Hierzu gehört unserer Meinung nach aber 
auch dann und wann ein Hinweis auf das, was man einen 
guten Programmierstil nennt, zum Beispiel auch die Verwen¬ 
dung der oben erwähnten Sprungleisten, gerade auch in 
Ihren eigenen Programmen. Umfangreiche Programme 
haben die Eigenart, nie ganz fertig zu sein und gerade die Ver¬ 
wendung solcher, doch eigentlich ganz simpler, Hilfsmittel 
kann eine Menge Arbeit ersparen. Vor allem dann, wenn man 
nicht so komfortable Hilfsmittel wie einen Assembler zur Ver¬ 
fügung hat, der ein Programm, von sagen wir acht KByte, voll¬ 
ständig neu assembliert; natürlich unter Umrechnung aller 
absolL-'-'' i Sprünge. 

Die erwähnte Sprungleiste umfaßt 16 Funktionen, die teil¬ 
weise vom Anwender verwendet werden können und die 
auch das restliche Betriebssystem verwendet. 

Zunächst einmal eine tabellarische Auflistung der mögli- 


chen Funktionen: 


Name 

Adresse 

Funktion 

jpcint 

scooo 

Videochip/Editor initialisieren 

jdsply 

$C003 

Ausgabe AC auf Schirm, Attribut in XR 

jlp2 

$C006 

Zeichen aus Tastatur-Puffer nach AC 

jloop5 

SC009 

Zeichen vom Schirm nach AC 

jprint 

$cooc 

Schirm-Ausgabe AC 

jscorg 

$COOF 

Schirm-Organisation lesen 

jkey 

$C012 

Tastatur-Abfrage 

jrep 

SC015 

Code aus Tast.-Tab. holen, REPEAT-Test 

jplot 

SC018 

Cursor-Position lesen/schreiben 

jcurs 

SC01B 

Cursor-Position im 80-Zeichen-BS setzen 

jesc 

SC01E 

Bearbeitung der ESC-Funktionen 

jkyset 

SC021 

Funktionstaste belegen 

jrsirq 

SC024 

Raster-Interrupt bearbeiten 

jint80 

SC027 

80-Zeichen-SChirm initialisieren 

jswap 

SC02A 

Umschalten 40/80-Zeichen-Schirm 

jwind 

SC02D 

Schirm-Fenster defihieren 


Die einzelnen Routinen werden im folgenden jeweils kurz 
besprochen, da sie einige der wichtigsten Routinen für die 
Kommunikation mit dem Computer von eigenen Programmen 
enthalten. 

jpcint ($C000) Videochip/Editor initialisieren 

Diese Routine setzt nach dem Einschalten des Computers 
beziehungsweise einem Drücken des RESET-Tasters die 
Grundeinstellung der Video-Controller und der für das Editor¬ 
programm wichtigen Speicheradressen, 
jdsply ($C003) Ausgabe AC auf Schirm, Attribut in XR 
Hiermit kann ein beliebiges Zeichen direkt auf den Bild¬ 
schirm gebracht werden, wobei das Zeichen im Akku stehen 
und bereits im Bildschirmcode vorliegen muß. Das X-Register 
muß das hierfür gültige Attribut-Byte enthalten, also die Färb- 
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Information für den 40-Zeichen-Bildschirm, und für den 
80-Zeichen-Bildschirm zusätzlich die Attribute für Unter¬ 
streichen, Blinken und so weiter. 

Das Attribut-Byte hat folgenden Aufbau: 


Bit 

40-Zeichen-Schirm 

80-Zeichen-Schirm 

0-3 

Farbinformation 

Farbinformation 


0000 = Schwarz 

0000 = Schwarz 


0001 = Weiß 

0001 = Grau 


0010 = Rot 

0010 = Blau 


0011= Grün 

0011= Hellblau 


0100 = Violett 

0100 = Dunkelgrün 


0101 = Dunkelgrün 

0101 = Hellgrün 


0110 = Blau 

0110 = Dunkelgrau 


0111= Gelb 

0111= Grün 


1000 = Hellbraun 

1000 = Rot 


1001 = Braun 

1001 = Rosa 


1010 = Rosa 

1010 = Hellbraun 


1011= Dunkelgrau 

1011= Violett 


1100 = Grau 

1100 = Braun 


1101= Hellgrün 

1101 = Gelb 


1110 = Hellblau 

1110 = Hellgrau 


1111= Hellgrau 

1111= Weiß 

4 

“ 

0 = Blinken aus 

1 = Blinken an 

5 

“ 

0 = Unterstreichen aus 

1 = Unterstreichen an 

6 


0 = Normale Darstellung 

1 = Inverse Darstellung 

7 

“ 

0 = Grafik/Großbuchstaben 

1 = Klein-/Großbuchstaben 


Im 40-Zeichen-Modus werden die Farben, und damit das 
Attribut-Byte, wie beim C64 dargestellt. Es werden also 
lediglich die untersten 4 Bit verwendet. 

Im 80-Zeichen-Modus wird lediglich das Bit 6 ($40) nicht 
verwendet. Wie auch beim 40-Zeichen-Bildschirm werden 
die inversen Zeichen durch ein gesetztes oberstes Bit des 
Schirmcodes dargestellt ($00 bis $7F = normales Zeichen, 
$80 bis $FF = inverses Zeichen). Das Bit 7 (Grafikdarstel¬ 
lung) ist im Zusammenhang mit der <SHIFT+CBM>-Taste 
zu sehen, mit der bekanntlich von Großbuchstaben/Grafik¬ 
zeichen auf Klein-/Großschreibung umgeschaltet werden 
kann. Im Gegensatz zum 40-Zeichen-Modus beziehungs¬ 
weise zum C 64 ist es hier aber möglich, Zeichen aus beiden 
Zeichensätzen gleichzeitig auf dem Schirm zu sehen. Wäh¬ 
rend im 40-Zeichen-Modus der Zeichensatz umgeschaltet 
wird, bestimmt hier lediglich das oberste Bit des Attribut- 
Bytes, welcher Zeichensatz für das einzelne Zeichen heran¬ 
gezogen werden soll. Hierdurch sind insgesamt 512 ver¬ 
schiedene Schriftzeichen gleichzeitig auf dem Bildschirm 
darstellbar, und zwar 128 Zeichen, diese in inverser Darstel¬ 
lung (=256) und das Ganze noch in zwei Zeichensätzen 
(=512). 

Der Zeichensatz des VDC befindet sich im eigenen 16- 
KByte-RAM-Bereich des VDC und kann mit eigenen Routi¬ 
nen verändert werden. Hierdurch ist es zum Beispiel möglich, 
die dort enthaltenen inversen Zeichen durch eigene Zeichen 
zu ersetzen, und die Revers-Darstellung durch das Setzen 
des entsprechenden Attribut-Bits zu erreichen. Hierdurch 
läßt sich die Anzahl der darstellbaren Zeichen noch einmal 
verdoppeln, so daß insgesamt 1024 (!) verschiedene Zei¬ 
chen gleichzeitig auf dem Schirm sichtbar sein können. 

Die Routine »jdsply« schreibt das Zeichen an die aktuell 
gesetzte Schreibposition, die durch die Speicherstellen 
»pnt« ($EO/$E1) als Basisadresse und »pntr« ($SEC) als ffset 
markiert wird. Die zugehörige Adresse im Attributspeicher 
wird durch die Routine selbständig errechnet und befindet 
sich nach der Rückkehr in der Adresse »user« ($E2/$E3). 
jlp2 $C006 Zeichen aus Tastaturpuffer nach AC 

Während des Interrupts werden Tastendrücke zunächst 
nur registriert und in den dafür vorgesehenen Tastaturpuffer 


von zehn Zeichen eingelesen. Mit der Routine »jlp2« können 
Sie nun aus eigenen Programmen Zeichen von der Tastatur 
holen, wobei die Zeichen dann aus dem Tastaturpuffer geholt 
werden, sofern dort Zeichen vorhanden sind. 

Nach dem Aufruf der Funktion enthält der Akkumulator das 
gelesene Zeichen oder, wenn kein Tastendruck vorliegt, eine 
Null. Der Inhalt des Tastaturpuffers wird durch die Routine um 
dieses eine Byte vermindert. Die Speicherstelle »ndx« ($D0) 
gibt dabei an, wieviel Zeichen sich gerade im Tastaturpuffer 
befinden. 

Die Funktionstasten <F1 > bis <F8> sowie auch die 
<HELP>-Taste und die < SHIFT+ RUN/STOP >-Taste wer¬ 
den dabei etwas anders behandelt. Auf die Funktionstasten 
<F1 > bis <F8> können mit dem KEY-Befehl Texte oder 
auch Befehle gelegt werden, die dann beim Drücken der ent¬ 
sprechenden Taste ausgeführt werden. Hierzu dient ein wei¬ 
terer Zähler »kyndx« ($D1), der angibt, wieviel Zeichen aus¬ 
zugeben sind und das Indexfeld »keyidx« ($D2), das auf das 
aktuelle Zeichen aus der Key-Definition zeigt. Die Funktions¬ 
tasten haben dabei Vorrang vor dem normalen Tastaturpuffer. 
Wenn zum Beispiel die Tasten <A>, <F1> und <B> 
betätigt werden, werden bei mehrfachem Aufruf von »jlp2« 
zunächst die einzelnen Zeichen des Tastaturstrings der 
Funktionstaste < Fl >, sofern vorhanden, zugewiesen und 
anschließend daran das »A« und das »B« gelesen. 
jloop5 SC009 Zeichen vom Schirm nach AC 

Die Routine »jloop5« liest ein Zeichen aus dem Bildschirm¬ 
speicher im ASCII-Format. Gelesen wird wieder aus der 
Adresse, die durch die aktuelle Bildschirmposition »pnt« 
($E0/$E1) und den Offset »pntr« ($EC) angegeben wird. 
Nach der Rückkehr enthält der Akkumulator das gelesene 
Zeichen und die Variable »tcolor« ($F2) das dazugehörende 
Attribut-Byte. 

jpriiii ~C00C Schirm-Ausgabe AC 

Mit Hilfe dieser Routine ist es möglich, ein Zeichen auf den 
Bildschirm zu bringen, wobei hier das Zeichen, im Gegensatz 
zur Routine »jdsply«, im ASCII-Format übergeben werden 
muß. Es können hier alle Zeichen, auch Steuerzeichen wie 
Cursor-Bewegungen, Farbumschaltungen und so weiter ver¬ 
wendet werden. Diese Routine wird zum Beispiel auch vom 
Basic innerhalb des PRINT-Befehls aufgerufen, 
jsorg $C00F Schirm-Organisation lesen 

Beim C128 ist es, im Gegensatz zum C 64, wie bei den 
großen CBM-Computern möglich, ein Bildschirmfenster zu 
setzen. Das bedeutet, daß die normalerweise eingestellte 
Bildschirmgröße von 25 Zeilen zu 40 beziehungsweise 80 
Zeichen jederzeit vom Anwender geändert werden kann, und 
irgendwelche Schirm-Ausgaben, zumindestens mit PRINT- 
Befehlen, sich nur noch auf dieses Schirmfenster beziehen. 
Mit der Routine »jscorg« können Sie sich jederzeit einen 
Überblick verschaffen, wie die momentane Aufteilung des 
Bildschirms ist. Nach dem Aufruf der Routine enthält das 
X-Register die momentane Anzahl zulässiger Spalten (Zei¬ 
chen pro Zeile), das Y-Register die maximal zulässige Anzahl 
Zeilen und der Akku die Zeilenbreite insgesamt, also entwe¬ 
der 40 oder 80. 
jkey $C012 Tastatur-Abfrage 

Diese Routine übernimmt die eigentliche Tastatur-Abfrage 
und das Bereitstellen der eingelesenen Zeichen im Tastatur¬ 
puffer. Für den Anwender ist sie unerheblich, da diese 
Abfrage im Interrupt selbsttätig vorgenommen wird, 
jrep SC015 Code aus Tastaturtabelle holen, REPEATTest 

Auch diese Routine ist für den Anwender uninteressant, da 
sie im Interrupt selbsttätig ausgeführt wird. Aufgrund der, in 
der Tastatur-Abfrage ermittelten, Tastennummer wird aus der 
zuständigen Tastaturtabelle der zugehörige ASCII-Wert 
ermittelt und geprüft, ob für diese Taste eine Wiederholung 
(Repeat) zulässig ist, sofern die Taste noch seit dem letzten 
Aufruf gedrückt ist. 
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jplot $C018 Cursor-Position lesen/schreiben 

Hiermit ist es jederzeit möglich festzustellen, an welcher 
Position auf dem Bildschirm sich momentan der Cursor befin¬ 
det, unabhängig davon, ob er gerade sichtbar ist oder nicht. 
Die Cursor-Position ist im übrigen die Position, an der das 
nächste mit PRINT beziehungsweise der Routine »jprint« aus¬ 
zugebende Zeichen erscheint. 

Um die Cursor-Position zu lesen, muß zuvor das Carry-Flag 
mit dem Befehl »SEC« gesetzt werden. Nach dem Aufruf der 
Routine enthält das X-Register die aktuelle Zeilennummer der 
Cursor-Position und das Y-Register die aktuelle Position 
innerhalb der Zeile. Beide Werte sind immer relativ zur linken 
oberen Ecke des aktuellen Bildschirmfensters zu sehen. 

Zum Schreiben der Cursor-Position muß vor dem Aufruf zu¬ 
nächst das Carry-Flag mit dem Befehl »CLC« gelöscht wer¬ 
den. Außerdem muß das X-Register die gewünschte Zeilen¬ 
nummer und das Y-Register die gewünschte Spalte enthal¬ 
ten; beide Werte wieder relativ zur linken oberen Ecke des 
Schirmfensters. Die erfolgreiche Ausführung des Befehls 
wird durch ein gelöschtes Carry-Flag angezeigt. Ist das 
Carry-Flag gesetzt, ist ein Fehler aufgetreten, also zum Bei¬ 
spiel eine Zeilennummer verwendet worden, die nicht in die 
aktuelle Fenstergröße paßt. 

Die aktuelle Zeichenposition »pnt« ($E0/$E1), der Spalten¬ 
offset »pntr« (SEC) sowie der Zeiger auf den Attributspeicher 
»user« (SE2/SE3) werden entsprechend neu errechnet, 
jcurs SC01B Cursor-Position im 80-Zeichen-BS setzen 

Im 80-Zeichen-Bildschirm wird der Cursor hardwaremäßig 
vom VDC erzeugt, also nicht wie beim 40-Zeichen-Bild- 
schirm durch einfaches Invertieren des aktuellen Zeichens. 
Mit der Routine »jcurs« wird die aktuelle Cursor-Position an 
den VDC übergeben und dort auf die entsprechende Stelle 
im Bildschirmspeicher gesetzt. Die Adresse wird wieder 
durch die aktuelle Zeichenposition »pnt« (SE0/SE1) und den 
Spaltenoffset »pntr« (SEC) markiert, die selbstverständlich 
vorher auf die gewünschte Adresse zu setzen sind. 

Das An- beziehungsweise Abschalten des Cursors kann 
leider nicht über eine Routine der Editor-Sprungleiste 
erreicht werden. Die entsprechenden Routinen heißen 
»crsron« (SCD6F) zum Einschalten und »crsrof« (SCD9F) 
zum Abschalten des Cursors. Beide Routinen wirken sich 
immer auf den gerade aktuellen Schirm, also wahlweise den 
40-Zeichen- oder 80-Zeichen-Bildschirm, aus. 

Der Cursor-Modus für den 40-Zeichen-Bildschirm wird 
durch die Adresse »blnon« ($0A26) festgelegt. Ist dort das 
Bit 6 ($40) gesetzt, wird ein fester Cursor erzeugt, ist das Bit 
nicht gesetzt, wird ein blinkender Cursor erzeugt. 

Im 80-Zeichen-Modus sind noch ein paar Steuerungen 
mehr möglich. Hierzu dient die Adresse »curmod« ($0A2B), 
die bitweise die gewünschte Cursor-Form angibt. Die einzel¬ 
nen Bits haben folgende Bedeutung, wobei nicht alle Mög¬ 
lichkeiten im CI28 genutzt, aber durchaus verwendet wer¬ 
den können: 

Bit Bedeutung 

7 Nicht benutzt 

6 Wenn das Bit " 1 " ist, blinkt der Cursor; ist das Bit " 0 ”, steht der 

Cursor fest 

5 Dieses Bit arbeitet in Zusammenhang mit Bit 6; Ist Bit 6 = ” 0 " und 

Bit 5 = " 1 ", dann ist der Cursor abgeschaltet. Ist Bit 6 = " 1 ", 
bestimmt dieses Bit die Blinkfrequenz; 

" 0 ” = schnell 

" 1" = langsam (Normalzustand) 

4 Immer "0" 

3 Sollte immer " 0 ' sein; das Bit wird als höchstwertiges Bit zu den 
folgenden Bits 0 bis 2 betrachtet 

0-2 Diese Bits geben an, an welcher Punktposition innerhalb des Zei¬ 

chens der Cursor beginnen soll 

Beim CI28 wird ein Zeichen aus acht Punktreihen zu 
jeweils acht Punkten, also insgesamt 64 Punkten, zusam¬ 


mengesetzt. Der Cursor wird durch Invertieren der entspre¬ 
chenden vertikalen Reihen dargestellt, wobei durch die Bits 
0 bis 2 gewählt wird, an welcher Position er beginnen soll. 
Sind alle Bits »0« beginnt der Cursor an der ersten Position; 
es wird also ein Block-Cursor dargestellt. Mit dem binären 
Wert 7 (alle drei Bit = »1«) beginnt der Cursor in der letzten 
Punktposition; es wird also ein Unterstrich-Cursor darge¬ 
stellt. Es sind hier natürlich auch Zwischenwerte möglich, die 
allerdings recht seltsam aussehen können (halber Cursor 
und ähnliches). 

Das Bit 3 stellt das oberste Bit dieser Punktkombination 
dar. Der Grund liegt darin, daß der VDC durch andere Pro¬ 
grammierung Zeichen auch mit 16 Punktzeilen darstellen 
könnte. Die Auflösung ist dabei natürlich erheblich besser, 
und die Zeichen sind in sich viel geschlossener und schärfer. 
Leider sind Farbmonitore erschwinglicher Preisklasse hiermit 
überfordert, daher wurde darauf verzichtet. Diese Möglich¬ 
keit merkt man übrigens auch bei einer Analyse der im VDC- 
RAM abgelegten Zeichensätze. Im Zeichensatz-ROM bele¬ 
gen die beiden Zeichensätze zusammen nur 4 KByte; im 
VDC-RAM jedoch 8 KByte. Hinter jeder Zeichendefinition, 
die aus 8 Byte besteht, befindet sich hier jeweils eine weitere 
Gruppe von 8 Null-Byte, um die 16 möglichen Punktreihen zu 
belegen. 

Hier noch einmal die sinnvollen Cursor-Formen in tabellari¬ 
scher Übersicht: 

Wert Cursor-Form 
$00 Block-Cursor, fest 
$07 Unterstrich-Cursor, fest 
$20 Cursor ausgeschaltet 

$40 Block-Cursor, schnell blinkend 

$47 Unterstrich-Cursor, schnell blinkend 
$60 Block-Cursor, langsam blinkend 
$67 Unterstrich-Cursor, langsam blinkend 
jesc 9*v)1E Bearbeitung der ESC-Funktionen 
Der C128 besitzt diverse Editor-Funktionen, die über eine 
ESCAPE-Sequenz aufgerufen werden. Hierzu wird zunächst 
<ESC> gedrückt und anschließend ein Buchstabe von 
<A> bis <Z> oder das <§>-Zeichen, beziehungsweise 
der < @ > bei der ASCII-Tastatur. Ein nochmaliges < ESC > 
direkt hinter dem ersten schaltet die Funktion sofort wieder 
aus, falls <ESC> versehentlich gedrückt wurde. Diese 
Funktionen können auch über PRINT-Befehle beziehungs¬ 
weise die oben erwähnte Routine »jprint« ausgeführt werden. 

Die Routine »jesc« ruft die entsprechenden Editor- 
Funktionen direkt, ohne vorheriges <ESC>, auf. Hierzu ist 
vor dem Aufruf im Akkumulator der gewünschte Befehls¬ 
buchstabe zu setzen. 

Die möglichen Befehle in tabellarischer Auflistung: 

Akkuinhalt Funktion 

§ Bildschirm ab Cursor-Position löschen 

A Autoinsert-Modus einschalten. Vor der Ausgabe eines Zei¬ 

chens wird vorher mit »Insert« automatisch eine freie Stelle 
eingerichtet. 

B Rechte untere Fensterecke an aktueller Cursor-Position set¬ 

zen 

C Autoinsert-Modus ausschalten 

D Aktuelle Zeile löschen. Der Rest des Bildschirms wird nach 

oben gerollt 

E Festen Cursor setzen 

F Blinkenden Cursor setzen 

G Glocke zulassen. Beim Betätigen von < CTRL+G > Glocken¬ 

signal, desgleichen bei der Ausgabe von CHR$(7) auf dem 
Bildschirm. 

H Glocke abschalten. Ein Aufruf der Glocke wird ignoriert 

I Zeile an der Cursor-Position einfügen. Die folgenden Zeilen 

verschieben sich nach unten 
J Cursor an den Anfang der Zeile setzen 

K Cursor auf Zeilenende setzen 

L Bildschirm-Rollen einschalten. Wird bei PRINT-Befehlen der 

untere Rand erreicht, werden die Zeilen nach oben gerollt und 
eine Leerzeile am Schirmende eingefügt. 
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M Bildschirm-Rollen ausschalten. Wird bei PRINT-Befehlen der 

untere Rand erreicht, wird die Ausgabe wieder am oberen 
Schirmrand fortgesetzt. 

N Negativ-Darstellung ausschalten (siehe »R«) 

O Einfüge-, Anführungszeichen- und Reverse-Modus (zum Bei¬ 

spiel nach Anführungszeichen) ausschalten 
P Zeile bis Cursor-Position löschen 

Q Zeile ab Cursor-Position löschen 

R Negativ-Darstellung einschalten. Der gesamte Bilschirminhalt 

wird invertiert, allerdings nicht der Bilschirmrahmen 
S Block-Cursor einschalten 

T Obere linke Fensterecke an aktuelle Cursor-Position setzen 

U Unterstrich-Cursor einschalten 

V Schirm um eine Zeile aufwärts rollen 

W Schirm um eine Zeile abwärts rollen 

X Umschalten von 40- auf 80-Zelchen-Modus und zurück 

Y Standard-Tabulatoren setzen 

Z Alle Tabulatoren löschen 

jkyset $C021 Funktionstaste belegen 

Hiermit können die Funktionstasten von Assemblerpro¬ 
grammen aus mit Werten belegt werden. Hierzu sind zu¬ 
nächst einige Vorbereitungen zu treffen. In der Zeropage ist 
an drei aufeinander folgenden Adressen ein Zeiger auf den 
neuen, der Funktionstaste zuzuordnenden Text einzurich¬ 
ten. Anschließend ist in den Akkumulator die Adresse des 
ersten Bytes dieses Zeigers zu laden, in das X-Register die 
Nummer der Funktionstaste laut unten stehender Tabelle und 
in das Y-Register die Länge des Textes. 

Die Funktionstaste < Fl > soll zum Beispiel mit dem Text 
»Testbelegung« definiert werden, der in der Bank 1 an der 
Adresse $3000 steht. Hierzu wird zunächst einmal ein Zei¬ 
ger in der Zeropage eingerichtet, sinnvollerweise an einer 
sonst nicht benötigten Stelle, zum Beispiel den Adressen 
$FA bis $FF. 

Belegt wird also 


Aufbau wird das Bild jeweils zeilenweise aufgebaut, wobei 
eine Zeile immer einer vertikalen Punktbreite entspricht. Der 
gesamte Bildschirm umfaßt theoretisch etwa 250 Zeilen 
inklusive des oberen und unteren Rahmens, wobei, je nach 
Monitor, einige Zeilen nicht sichtbar sind. Der VIC kann nun 
veranlaßt werden, bei Erreichen einer bestimmten Raster¬ 
zeile einen Interrupt auszulösen. Solche Interrupts werden 
von dieser Routine bearbeitet, die dann jeweils vom Grafik¬ 
schirm auf den Textschirm umschalten und somit einen 
geteilten Bildschirm simulieren. 
jintßO $C027 80-Zeichen-Schirm initialisieren 
Mit dieser Routine wird der Zeichengenerator in das RAM 
des VDC kopiert. Wie schon erwähnt, wird beim Betätigen 
der <ASCII/DIN > -Taste der jeweils aktuelle Zeichensatz 
übertragen. Diese Funktion übernimmt die vorliegende Rou¬ 
tine, die den Zeichengenerator von der Adresse $D000 in 
Bank 14 in das RAM des VDC kopiert, 
jswap SC02A Umschalten 40/80-Zeichen-Schirm 
Diese Funktion schaltet auf den jeweils anderen Bild¬ 
schirm, also von 40 Zeichen auf 80 Zeichen oder umgekehrt, 
um. Sie entspricht vollständig der Funktion »ESC X« und wird 
von dieser auch aufgerufen, 
jwind SC02D Bildschirmfenster definieren 
Mit dieser Funktion können Bildschirmfenster gesetzt wer¬ 
den, wie auch schon mit den Funktionen »ESC B« bezie¬ 
hungsweise »ESC T«. Vor dem Aufruf ist im Akkumulator die 
gewünschte Zeilennummer absolut, das heißt also von 0 bis 
24 und im X-Register die gewünschte Spalte, ebenfalls abso¬ 
lut, also von 0 bis 39 beziehungsweise 0 bis 79, anzugeben. 
Bei gesetzem Carry-Flag wird die rechte untere Ecke des 
Fensters gesetzt, bei gelöschtem Carry-Flag die linke obere 
Ecke. 


646 R onnn#i 


SFA mit $00, dem Low-Byte der Adresse $3000 
$FB mit $30, dem High-Byte der Adresse $3000 
$FC mit $01, der Banknummer 

Anschließend werden die Prozessor-Register geladen, 
und zwar: 

AC mit $FA, der Zeigeradresse 

XR mit $01, der Nummer der Funktionstaste 

YR mit $0C, der Länge des Textes 

Nun kann die Routine aufgerufen und die Funktionstaste 
belegt werden. Mögliche Funktionstasten sind die Tasten 
<F1> bis <F8>, die <HELP>-Taste und die <SHIFT- 
RUN/STOP>-Taste. Die anzugebende Nummer finden Sie in 


der folgenden Tabelle: 

Nummer Taste 

Standardwert 

1 

<F1 > 

GRAPHIC 

2 

<F2> 

DLOAD" 

3 

<F3> 

DIRECTORY + CHR$(13) 

4 

<F4> 

SCNCLR + CHR$(13) 

5 

<F5> 

DSVAVE" 

6 

<F6> 

RUN + CHR$(13) 

7 

<F7 > 

LIST + CHR$(13) 

8 

<F8> 

MONITOR + CHR$(13) 

9 

< SHIFT+RUN/ST0P > 

DL"-" + CHR$(13) + RUN + 

10 

<HELP> 

CHR$(13) 

HELP + CHR$(13) 


Beachten Sie bitte beim Belegen der Funktionstasten, daß 
alle zehn Definitionen zusammen nicht mehr als 246 Zeichen 
umfassen dürfen. 

jrsirq $C024 Raster-Interrupt bearbeiten 

Diese Routine ist für den Anwender nicht von Belang, da sie 
im Interrupt automatisch aufgerufen wird. Sie dient zur 
Umschaltung von Grafik- und Textbildschirm, wenn im Basic 
ein Grafikmodus mit geteiltem Schirm eingestellt wurde. Beim 


Das Kemel 


Das Kernel umfaßt alle Funktionen, die zum ordnungsgemä¬ 
ßen Betrieb des Computers notwendig sind, und ruft seiner¬ 
seits auch den Editor auf. Im Kernel sind alle Routinen enthal¬ 
ten, um den Datenverkehr auf dem seriellen Bus zur Floppy 
oder einem Drucker zu regeln, sowie die gesamte Bedienung 
der RS232-Schnittstelle und des Kassettenrecorders. Wei¬ 
terhin übernimmt es die Bearbeitung von Interrupts, also IRQ 
und NMI sowie die erstmalige Einstellung aller Systempara¬ 
meter nach dem Einschalten oder dem Drücken des Reset- 
Tasters. 

Auch das Kernel verfügt über eine Sprungleiste, die hier 
allerdings am Ende des Programms liegt und über die alle not¬ 
wendigen Funktionen aufgerufen werden können. Der 
grundlegende Teil der Sprungleiste ist übrigens mit der des 
C 64 identisch; sie ist nur um einige Funktionen erweitert 
worden, die beim CI28 hinzugekommen sind. 

Hier zunächst einmal eine tabellarische Auflistung der ein¬ 
zelnen Funktionen, und anschließend eine eingehende Be¬ 
sprechung der wichtigsten Routinen. Alle Routinen unterhalb 
der punktierten Linie sind übrigens identisch mit denen des 
C64. 

kspio SFF47 Auf I/O schnelle Floppy umschalten 

Mit dieser Funktion wird auf die schnelle Floppyroutine 
umgeschaltet, die allerdings nur mit den Floppylaufwerken 
1570 und 1571 verwendet werden kann. Das Carry-Flag 
bestimmt, ob die Routine eingeschaltet (Carry gelöscht) oder 
ausgeschaltet (Carry gesetzt) werden soll, 
kclsal $FF4A Alle Files von Gerät in AC schließen 

Mit dieser Funktion können alle Daten gleichzeitig 
geschlossen werden, die auf der im Akku angegebenen 
Geräteadresse geöffnet sind. Ein gesetzes Carry-Flag nach 
der Rückkehr zeigt einen Fehler innerhalb der Routine an. 
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Name 

Adresse 

Funktion 

kspio 

SFF47 

Auf I/O schnelle Floppy umschalten 

kclsal 

SFF4A 

Alle Files von Gerät in AC schließen 

kc64md 

SFF4D 

Auf C 64-Modus umschalten 

kdmacl 

SFF50 

DMA-Anforderung ext. RAMs zulassen 

kbotcl 

SFF53 

Boot-Programm von Diskette laden 

kphenx 

$FF56 

Aufruf Kaltstartroutinen Funktionskarte 

klkupl 

SFF59 

Geräte- 8 Sek.-Adr. über la (ac) suchen 

klkups 

SFF5C 

Geräte-Adr. über Sek.-Adr. (yr) suchen 

kswapr 

$FF5F 

Umschalten 40/80-Zeichen-BS 

kdlchr 

$FF62 

80-Zeichen-BS initialisieren 

kpfkey 

$FF65 

Funktionstaste belegen 

kstbnk 

SFF68 

Bank für LOAD/SAVE/VERIFY setzen 

kgtcfg 

$FF6B 

MMU-Wert zu Bank in xr nach ac 

kjsrfr 

$FF6E 

JSR, Bank xr 

kjmpfr 

SFF71 

JMP, Bank xr 

kifetv 

SFF74 

LDA (FETVEC),y von Bank in xr 

kistav 

$FF77 

STA (STAVEC),y in Bank in xr 

kicmpv 

$FF7A 

CMP (CMPVEC),y mit Bank in xr 

kprimm 

SFF7D 

Folgenden Text ausgeben und überspringen 

kpcint 

$FF81 

Videochips/Editor initialisieren 

kioini 

$FF84 

I/O-Bausteine initialisieren 

kramts 

$FF87 

RAM, Kass.-Puffer u. Vectoren einrichten 

kresto 

SFF8A 

Standard-I/O-Vektoren einrichten 

kvecto 

SFF8D 

User-I/O-Vektoren einrichten 

kstmsg 

$FF90 

Flag setzen Unterdrückung Meldungen 

ksecnd 

SFF93 

Ausgabe Sek.-Adr. nach LISTEN auf lEC-Bus 

ktsksa 

$FF96 

Ausgabe Sek.-Adr. nach TALK auf lEC-Bus 

kmemtp 

$FF99 

höchste Speichergrenze lesen/schreiben 

kmembt 

SFF9C 

unterste Speichergrenze lesen/schreiben 

kscnky 

$FF9F 

Tastatur-Abfrage 

ksetmo 

$FFA2 

Timeout-Flag lEC-Bus setzen 

kacptr 

SFFA5 

Zeichen von lEC-Bus nach AC 

kciout 

SFFA8 

Ausgabe ac auf lEC-Bus 

kuntlk 

SFFAB 

Ausgabe UNTALK auf lEC-Bus 

kunlsn 

SFFAE 

Ausgabe UNLISTEN auf lEC-Bus 

klistn 

SFFB1 

Ausgabe LISTEN auf lEC-Bus 

ktalk 

SFB4 

Ausgabe TALK auf lEC-Bus 

kreads 

SFFB7 

Aktueller Status nach AC 

kstlfs 

SFFBA 

la, fa, sa aus ac, xr, yr setzen 

kstnam 

SFFBD 

fnlen, fnadr aus ac, xr, yr setzen 

kopen 

SFFCO 

Logisches File öffnen 

kclose 

$FFC3 

Logisches File schließen 

kchkin 

$FFC6 

Eingabe-Kanal öffnen 

kckout 

SFFC9 

Ausgabe-Kanal öffnen 

kclrch 

$FFCC 

Ein/Ausgabe-Kanal schließen 

kbasin 

SFFCF 

Zeichen akt. Kanal nach AC 

kbsout 

SFFD2 

Ausgabe AC auf akt. Kanal 

kloads 

SFFD5 

LOAD/VERIFY (AC) ab Adresse in xr/yr 

ksaves 

SFFD8 

Save ab ac bis xr, yr 

ksttim 

SFFDB 

System-Uhr setzen 

krdtim 

SFFDE 

System-Uhr nach ac, xr, yr 

kstop 

$FFE1 

Stop-Taste lesen 

kgetin 

SFFE4 

Zeichen akt. Kanal nach AC 

kclall 

SFFE7 

Filetabelle löschen, Vorgabe-I/O 

kclock 

$FFEA 

System-Uhr aktualisieren 

kscror 

SFFED 

BS-Organisation lesen 

kplot 

SFFFO 

Cursor-Pos. lesen/schreiben 

kiobas 

SFFF3 

Basisadresse I/O-Bausteine nach xr/yr 


kc64md $FF4D Auf C64-Modus umschalten 

Diese Routine schaltet auf den C64-Modus um, wobei ein 
Rücksprung von dort nur mit der Reset-Taste möglich ist. 
Diese .Routine wird, auch vom Basic-Befehl »G064« aufgeru¬ 
fen. 

kdmacl $FF50 DMA-Anforderung externer RAMs zulassen 

Diese Roytinis efent zum DMA (Direct Memory Access = 
direkter Speicherzugriff) durch externe Geräte. Im Normalbe¬ 
trieb des C128 ist sie nicht von Belang, 
kbotcl $FF53 Boot-Programm von Diskette laden 
Mit dem Basic-Befehl »BOOT« kann zum Beispiel das 
CP/M-Betriebssystem geladen werden, in dem der Block 0 in 
der Spur 1 der Diskette gelesen wird, wo weitere Anweisun¬ 
gen wie Programmname, Startadresse und so weiter zu fin¬ 


den sind. Diese Routine ruft die entsprechende Funktion auf, 
wobei im Akkumulator die Laufwerknummern 0 oder 1 im 
ASCII-Code, also $30 oder $31, und im X-Register die Gerä¬ 
tenummer stehen müssen. Wenn der gelesene Sektor ein 
Bootsektor ist, wird das Programm ausgeführt, ansonsten 
wird der Aufruf ignoriert. 

kphenx $FF56 Aufruf Kaltstartroutinen Funktionskarte 

Diese Routine dient zum Aufruf der zusätzlichen Funk¬ 
tionskarte, die im normalen C128 nicht enthalten ist. Wird die 
Routine hier aufgerufen, wird ein normaler »Boot« von Gerät 
8, Laufwerk 0, durchgeführt. 

klkupl $FF59 Geräte- und Sekundäradresse über la (ac) 
suchen 

Zu einer vorgegebenen logischen Dateinummer im Akku¬ 
mulator werden die zugehörige Gerätenummer und die 
Sekundäradresse in der Dateitabelle gesucht. Das Carry- 
Flag zeigt an, ob ein entsprechender Eintrag in der Dateita¬ 
belle gefunden wurde. Ist das Carry-Flag gesetzt, ist diese 
Datei nicht geöffnet. Ist das Carry-Flag gelöscht, enthält das 
X-Register die Geräteadresse, das Y-Register die Sekundär¬ 
adresse und der Akkumulator die logische Dateinummer, 
klkups $FF5C Geräteadresse über Sekundäradresse (yr) 
suchen 

Zu einer vorgegebenen Sekundäradresse im Y-Register 
werden die zugehörige logische Dateinummer und die 
Sekundäradresse gelesen. Das Carry-Flag zeigt an, ob ein 
entsprechender Eintrag in der Dateitabelle gefunden wurde. 
Ist das Carry-Flag gesetzt, ist diese Datei nicht geöffnet. Ist 
das Carry-Flag gelöscht, enthält das X-Register die Geräte¬ 
adresse, das Y-Register die Sekundäradresse und der Akku¬ 
mulator die logische Dateinummer, 
kswapr $FF5F Umschalten 40/80-Zeichen-Bildschirm 

Diese Routine ruft die unter den Editor-Funktionen 

besch/'obene R 0U tine »jswap« auf. 

kdlchr »FF62 80-Zeichen-Bildschirm initialisieren 

Diese Routine ruft die unter den Editor-Funktionen 
beschriebene Routine »jint80« auf. 
kpfkey $FF65 Funktionstaste belegen 

Diese Routine ruft die unter den Editor-Funktionen 
beschriebene Routine »ikyset« auf. 
kstbnk $FF68 Bank für LOAD/SAVE/VERIFY setzen 

Beim Eröffnen von Diskettendateien müssen in der Regel 
Dateinamen angegeben werden, deren Adressen in der Spei¬ 
cherstelle »fnadr« ($BB/$BC) zu finden sind. Beim CI28 
muß darüber hinaus noch die Bank angegeben werden, auf 
die sich diese Adresse bezieht. Die Bank wird mit dieser 
Funktion gesetzt, wobei das X-Register die entsprechende 
Bit-Kombination für das MMU-Register und der Akkumulator 
die Banknummer enthalten muß. 
kgtcfg $FF6B MMU-Wert zu Bank in XR nach AC 

Zu jeder RAM- oder ROM-Bank des C128 gehört eine ent¬ 
sprechende Bit-Kombination, die in das Konfigurationsregi¬ 
ster der MMU zu schreiben ist, um die gewünschte Speicher¬ 
verteilung zu erhalten. Hierzu existiert im Kernel-ROM eine 
entsprechende Tabelle. Diese Routine sucht zu einer gege¬ 
benen Banknummer im X-Register die entsprechende Kom¬ 
bination aus der Tabelle und stellt sie im Akkumulator zur Ver¬ 
fügung. 

kjsrfr $FF6E JSR, Bank xr 

Diese Routine ruft ein Unterprogramm auf, das sich in einer 
beliebigen Speicherbank befinden kann. Hierzu muß das X- 
Register die Banknummer enthalten, und die Speicherstellen 
»areg« und folgende die entsprechenden gewünschten Regi¬ 
sterinhalte beim Eintritt in das Unterprogramm. Die Logik ent¬ 
spricht hier einem JSR-Befehl. 
kjmpfr $FF71 JMP, Bank xr 

Diese Routine ruft ein Programm auf, das sich in einer belie¬ 
bigen Speicherbank befinden kann. Hierzu muß das X- 
Register die Banknummer enthalten, und die Speicherstellen 
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»areg« und folgende die entsprechenden gewünschten Regi¬ 
sterinhalte beim Eintritt in das Programm. Die Logik entspricht 
hier einem JMP-Befehl. 
kifetv $FF74 LDA (FETVEC),y von Bank in xr 

Mit Hilfe dieser Routine kann ein Byte aus einer anderen 
Speicherbank als der, in der das aktuelle Programm gerade 
läuft, gelesen werden. Hierzu muß das Y-Register die Bank¬ 
nummer und der Akkumulator die Adresse eines Adressen¬ 
paars aus der Zeropage enthalten, in der die zu lesende 
Adresse steht. Die Funtkion entspricht somit in etwa einem 
»LDA (Adresse),y«-Befehl. 
kistav SFF77 STA (STAVEC),y in Bank in xr 

Mit Hilfe dieser Routine kann ein Byte in eine andere Spei¬ 
cherbank als die, in der das aktuelle Progrmm gerade läuft, 
geschrieben werden. Hierzu muß das X-Register die Bank¬ 
nummer und die Speicherstelle »stashx« ($02B9) die 
Anfangsadresse eines Registerpaars aus der Zeropage ent¬ 
halten, in der die zu schreibende Adresse steht. Die Funktion 
entspricht somit in etwa einem »STA (Adresse),y«-Befehl. 
kicmpv $FF7A CMP (CMPVEC),y mit Bank in xr 

Mit Hilfe dieser Routine kann ein Byte im Akkumulator mit 
einem Byte aus einer anderen Speicherbank als der, in der 
das aktuelle Programm gerade läuft, verglichen werden. 
Hierzu muß das X-Register die Banknummer enthalten, und 
die Speicherstelle »cmparx« ($02CD) die Anfangsadresse 
eines Registerpaars aus der Zeropage, in der die zu verglei¬ 
chende Adresse steht. Die Funktion entspricht somit in etwa 
einem »CMP (Adresse),y«-Befehl. 

kprimm SFF7D Folgenden Text ausgeben und übersprin¬ 
gen 

Mit Hilfe dieser Routine kann ein beliebiger Text, der direkt 
auf den JSR-Befehl folgt, auf dem Bildschirm ausgegeben 
werden. Der Text kann beliebig lang sein und muß mit »$00« 
beendet werden. Anschließend wird die Verarbeitung mit 
dem auf den Text folgenden Befehl fortgesetzt. Diese Rou¬ 
tine ist im übrigen ein Musterbeispiel für trickreiche Program¬ 
mierung und ist somit durchaus eine genaue Analyse wert, 
kpcint SFF81 Videochips/Editor initialisieren 

Diese Routine ruft die unter den Editor-Funktionen bespro¬ 
chene Routine »jpcint« auf. 
kioini SFF84 I/O-Bausteine initialisieren 

Mit dem Aufruf dieser Routine werden alle Ein-/Ausgabe- 
Bausteine auf ihre Standardwerte nach dem Einschalten des 
Rechners gesetzt. Wird ein Anwender-Programm von ande¬ 
ren Programmen aufgerufen und herrscht Unklarheit über die 
aktuelle Einstellung der Peripherie-Bausteine, so kann hier¬ 
mit ein definierter Zustand hergestellt werden. 

kramts SFF87 RAM, Kassettenpuffer und Vektoren ein¬ 
richten 

Mit dieser Routine werden die Zeiger auf die Ein-/Ausgabe- 
Puffer neu eingerichtet und die Speichergrenzen auf die 
Standardwerte festgelegt, 
kresto $FF8A Standard-I/O-Vektoren einrichten 

Diese Routine stellt die normalen I/O-Vektoren, zum Bei¬ 
spiel für IRQ, Öffnen einer Datei und so weiter wieder her. Sie 
kann aufgerufen werden, wenn diese Vektoren ganz oder teil¬ 
weise verändert wurden, um den Grundzustand wiederher¬ 
zustellen. 

kvecto $FF8D User-I/O-Vektoren einrichten 

Hiermit können die I/O-Vektoren auf eigene Adressen 
gesetzt werden. Hierzu muß im X-Register das Lew-Byte und 
im Y-Register das High-Byte der Vektorentabelle gesetzt 
werden. Die Vektorentabelie selbst muß alle 16 möglichen 
Vektoren enthalten, um Fehler zu vermeiden. Sie baut sich 
aus jeweils einem Wort (2 Byte) in der Reihenfolge Low-Byte, 
High-Byte auf, die auf die Adressen der aufzurufenden Routi¬ 
nen zeigen. Die Original-Vektortabelle »vectss« ($E073) 
kann hierfür teilweise kopiert werden. 


kstmg SFF90 Flag setzen Unterdrückung Meldungen 

Bei der Abarbeitung von Systemroutinen können Fehler 
auftreten, wie zum Beispiel ein nicht angegebener Datei¬ 
name und ähnliches. Normalerweise würde dann auf dem 
Bildschirm eine entsprechende Fehlermeldung erscheinen. 
Diese Routine setzt ein Flag, mit dem die Ausgabe dieser 
Meldung verhindert (Akku = $40) oder ermöglicht (Akku = 
$00) werden kann. Zusätzlich kann durch ein gesetztes Bit 
7 ($80 beziehungsweise $C0) verhindert werden, daß bei 
Operationen, wie zum Beispiel dem Laden von Programmtei¬ 
len, der Text »searching for...« oder auch »press play...« auf 
dem Bildschirm erscheint. 

kseend $FF93 Ausgabe Sekundäradresse nach LISTEN 
auf lEC-Bus 

Hiermit wird die gewünschte Sekundäradresse nach einem 
Listen-Befehl auf dem lEC-Bus ausgegeben, um dem Peri¬ 
pheriegerät mitzuteilen, über welche Sekundäradresse die 
folgenden Daten abzulegen sind. Die gewünschte Sekundär¬ 
adresse muß sich beim Aufruf im Akkumulator befinden. 

Hierzu kurz noch eine Anmerkung: Die gesamte Steuerung 
des lEC-Bus ist recht komplex und kann schnell durcheinan¬ 
der kommen, wenn die korrekte Reihenfolge der Listen-, Un¬ 
listen-, Talk- und sonstigen Befehle nicht eingehalten wird. 
Noch nicht so erfahrene Programmierer sollten daher auf die 
eigene Anwendung der lEC-Routinen verzichten, und besser 
mit den weiter unten beschriebenen Funktionen »kchkin«, 
»kekout«, »kgetin« und »kbsout« arbeiten. Bei der Verwen¬ 
dung dieser Routinen übernimmt das Betriebssystem die 
gesamte Steuerung des lEC-Bus; allerdings sind diese Routi¬ 
nen insgesamt etwas langsamer als die direkte Steuerung, 
ktksa SFF96 Ausgabe Sekundäradresse nach TALK auf 
lEC-Bus 

Hiermit wird die gewünschte Sekundäradresse nach einem 
Talk-Ecfehl auf dem lEC-Bus ausgegeben, um dem Periphe¬ 
riegerät mitzuteilen, über welche Sekundäradresse die fol¬ 
genden Daten zu senden sind. Die gewünschte Sekundär¬ 
adresse muß sich beim Aufruf im Akkumulator befinden. 
Ansonsten gilt auch hier der unter »kseend« gegebene Hin¬ 
weis. 

kmemtp SFF99 Höchste Speichergrenze lesen/schreiben 

Diese Routine liest oder schreibt wahlweise die höchste 
Speicheradresse, die vom Benutzerprogramm (und hier ist 
auch der Basic-Interpreter ein Benutzer!) verwendet werden 
kann. Über das Carry-Flag wird gesteuert, ob die Adresse 
geschrieben (Carry nicht gesetzt) oder gelesen (Carry 
gesetzt) werden soll. Beim Setzen muß im X-Register das 
Low-Byte und im Y-Register das High-Byte der Adresse ste¬ 
hen; beim Lesen enthalten die angegebenen Register die 
momentan gültigen Werte. 

kmembt $FF9C Unterste Speichergrenze lesen/schrei¬ 
ben 

Diese Routine liest oder schreibt wahlweise die unterste 
Speicheradresse, die vom Benutzerprogramm verwendet 
werden kann. Über das Carry-Flag wird gesteuert, ob die 
Adresse geschrieben (Carry nicht gesetzt) oder gelesen 
(Carry gesetzt) werden soll. Beim Setzen muß im X-Register 
das Low-Byte und im Y-Register das High-Byte der Adresse 
stehen; beim Lesen enthalten die angegebenen Register die 
momentan gültigen Werte, 
ksenky SFF9F Tastatur-Abfrage 

Hiermit wird die unter den Editor-Funktionen besprochene 
Routine »jkey« aufgerufen, 
ksetmo $FFA2 Timeout-Flag lEC-Bus setzen 

Diese Funktion wird vom System nicht verwendet. Die ent¬ 
sprechende Speicherstelle für das Verhindern des IEC- 
Timeout, wie zum Beispiel bei den großen CBM-Rechnern, 
ist zwar vorhanden, wird aber nicht verwendet. Somit dürfte 
die Routine nur als Platzhalter anzusehen sein, um ein Ver¬ 
schieben der restlichen Adressen zu verhindern. 


146 


SONDERHEFT 10 





C 128 


TIPS&TRICKS 


kacptr $FFA5 Zeichen von lEC-Bus nach AC 

Diese Routine liest ein Zeichen direkt vom lEC-Bus in den 
Akkumulator. Zuvor müssen die entsprechenden Talkrouti¬ 
nen aufgerufen werden. Hierfür gilt ansonsten auch der unter 
»ksecnd« geschriebene Hinweis, 
kciout $FFA8 Ausgabe ac auf lEC-Bus 
Das Zeichen im Akkumulator wird direkt auf dem lEC-Bus 
ausgegeben. Zuvor müssen die entsprechenden Listenrouti¬ 
nen aufgerufen werden. Hierfür gilt ansonsten auch der unter 
»ksecnd« gegebene Hinweis, 
kuntlk $FFAB Ausgabe UNTALK auf lEC-Bus 
Auf dem lEC-Bus wird ein »Untalk« ausgegeben, also die 
Aufforderung, das Senden von Daten einzustellen. Hierfür 
gilt ansonsten auch der unter »ksecnd« gegebene Hinweis, 
klistn $FFB1 Ausgabe LISTEN auf lEC-Bus 
Hiermit wird auf dem lEC-Bus ein »Listen« ausgegeben, 
also die Kennzeichnung, daß jetzt Daten-Bytes folgen. Hier¬ 
für gilt ansonsten auch der unter »ksecnd« gegebene Hin¬ 
weis. 

ktalk $FFB4 Ausgabe TALK auf lEC-Bus 

Hiermit wird auf dem lEC-Bus ein »Talk« ausgegeben, also 
die Kennzeichnung, daß jetzt Daten zu senden sind. Hierfür 
gilt ansonsten auch der unter »ksecnd« gegebene Hinweis. 

kreads $FFB7 Aktueller Status (RS232 beziehungsweise 
Syst.) nach AC 

Hiermit kann der aktuelle Status nach einer Ein-/Ausgabe- 
operation abgefragt werden. Der Status enthält eine Null, 
wenn die Operation fehlerfrei abgeschlossen wurde, anson¬ 
sten wird, bitweise verschlüsselt, ein Hinweis auf die Art des 
Fehlers gegeben. Die einzelnen Bits haben, sofern sie auf »1« 
gesetzt sind, folgende Bedeutung: 


Bit Bedeutung 

0 Timeout (Zeitüberschreitung) beim Schreiben 

1 Timeout (Zeitüberschreitung) beim Lesen 

2 Zu kurzer Datenblock (Nur Kassette) 

3 Zu langer Datenblock (Nur Kassette) 

4 Schwerer Fehler, nicht weiter spezifiziert 

5 Prüfsummenfehler 

6 Dateiende, kein Fehler, nur ein Hinweis 

7 Angesprochenes Gerät nicht angeschlossen oder 

Bandende (nur Kassette) _ 


kstlfs $FFBA la, fa, sa aus ac, xr, yr setzen 

Die aktuellen Parameter für eine zu öffnende Datei können 
hiermit gesetzt werden. Der Akkumulator muß die logische 
Dateinummer, das X-Register die Gerätenummer und das Y- 
Register die Sekundäradresse enthalten. Zusätzlich ist im 
Anschluß an diese Funktion unter Umständen noch der Da¬ 
teiname mit der im folgenden beschriebenen Funktion »set- 
nam« anzugeben. 

kstnam $FFBD fnlen, fnadr aus ac, xr, yr setzen 

Hiermit können die Parameter für einen Dateinamen beim 
Eröffnen einer Datei gesetzt werden. Der Akkumulator muß 
die Länge des Dateinamens und, sofern die Länge nicht null 
- also kein Dateiname vorhanden - ist, das X-Register das 
Low-Byte der Dateinamenadresse und das Y-Register das 
High-Byte enthalten. Zusätzlich ist noch mit der Routine 
»setbnk« (siehe dort) die Banknummer zu definieren, in der 
der Dateiname steht. Falls nicht schon geschehen, werden 
außerdem mit der oben beschriebenen Routine »kstlfs« die 
Parameter für Dateinummer, Geräte- und Sekundäradresse 
definiert. 

kopen $FFC0 Logisches File öffnen 

Eine zuvor mit den oben beschriebenen Parametern verse¬ 
hene Datei kann mit dieser Routine geöffnet werden. Nach 
der Operation zeigt das Carry-Flag an, ob die Funktion erfolg¬ 
reich (Carry nicht gesetzt) oder fehlerhaft (Carry gesetzt) 
war. 


kclose $FFC3 Logisches File schließen 

Eine zuvor geöffnete Datei kann mit dieser Funktion wieder 
geschlossen werden. Der Akkumulator muß hierzu die logi¬ 
sche Dateinummer enthalten. Nach der Operation zeigt das 
Carry-Flag an, ob das Eröffnen erfolgreich (Carry nicht 
gesetzt) oder fehlerhaft (Carry gesetzt) war. 
kchkin $FFC6 Eingabe-Kanal öffnen 
Diese Routine dient zum Einlesen von Daten von beliebi¬ 
gen Geräten. Zuvor ist eine entsprechende Datei zu öffnen, 
wobei hier jedes Gerät verwendet werden kann, das als Ein¬ 
gabegerät zugelassen ist, also lEC-Bus (Gerätenummern 4 
bis 15), Kassette (#1), RS232-Schnittstelle (#2) und Bild¬ 
schirm (#0). 

Beim Aufruf der Routine muß das X-Register die logische 
Dateinummer enthalten. Alle folgenden Aufrufe zum Beispiel 
der Routine »kgetin« (siehe dort) lesen jeweils ein Zeichen 
vom angesprochenen Gerät, bis mit der Routine »kclrch« die 
Eingabe wieder auf die Tastatur zurückgestellt wird, 
kckout $FFC9 Ausgabe-Kanal öffnen 
Diese Routine dient zum Ausgeben von Daten auf beliebige 
Geräte. Zuvor ist eine entsprechende Datei zu öffnen. Dabei 
kann jedes Gerät verwendet werden, das als Ausgabegerät 
zugelassen ist, also lEC-Bus (Gerätenummern 4 bis 15), Kas¬ 
sette (# 1), RS232-Schnittstelle (# 2) und Bildschirm (# 3). 

Beim Aufruf der Routine muß das X-Register die logische 
Dateinummer enthalten. Alle folgenden Aufrufe zum Beispiel 
der Routine »kbsout« (siehe dort) schreiben jeweils ein Zei¬ 
chen auf das angesprochene Gerät, bis mit der Routine 
»kclrch« die Ausgabe wieder auf den Bildschirm zurückge¬ 
stellt wird. 

kclrch SFFCC Ein/Ausgabe-Kanal schließen 

Diese Routine stellt nach erfolgter Datenein- oder -ausga- 
be wieder auf den Bildschirm als Ausgabe- und die Tastatur 
als Eingabegerät zurück. 

kbasin $FFCF Zeichen vom aktiven Kanal nach AC 

Hiermit wird ein Zeichen vom aktiven Eingabe-Kanal gele¬ 
sen. Normalerweise wird ein Zeichen aus der aktuellen Bild¬ 
schirmposition gelesen, es sei denn, mit »kchkin« ist zuvor 
eine Datei als Eingabe-Kanal aktiviert worden, 
kbsout $FFD2 Ausgabe AC auf aktiven Kanal 
Hiermit wird ein Zeichen auf dem aktiven Ausgabe-Kanal 
ausgegeben. Normalerweise wird ein Zeichen an der aktuel¬ 
len Bildschirmposition ausgegeben, es sei denn, mit 
»kckout« wurde zuvor eine Datei als Ausgabe-Kanal aktiviert, 
kloads $FFD5 Load/verify (AC) ab Adresse in xr/yr 
Hiermit kann ein Programm geladen beziehungsweise mit 
einem im Speicher stehenden Programm verglichen werden. 
Hierzu sind zunächst die Parameter für den Dateinamen zu 
setzen, und dann die Routine aufzurufen. Im Akkumulator 
muß angegeben werden, ob ein »Load« (Akku = $00) oder 
ein »Verify« (Akku < > $00) durchgeführt werden soll. Der 
Lade- oder Vergleichsvorgang beginnt ab der in der Datei 
angegebenen Startadresse, sofern die Sekundäradresse null 
ist. Ist die Sekundäradresse ungleich null, so wird die Datei 
an die Adresse geladen, die im X-Register (Low-Byte) und im 
Y-Register (High-Byte) angegeben ist. 
ksaves SFFD8 Save ab ac bis xr, yr 
Mit dieser Routine kann ein im Speicher stehendes Pro¬ 
gramm in einer Datei gesichert werden. Hierzu sind zunächst 
die Parameter für den Dateinamen zu setzen, und dann die 
Routine aufzurufen. Im Akkumulator muß die Adresse eines 
Zeropage-Registerpaares angegeben werden, das die Start¬ 
adresse im Speicher enthält. Die Endadresse wird beim Auf¬ 
ruf mitgeteilt, wobei das X-Register das Low-Byte und das Y- 
Register das High-Byte enthalten muß. 
ksttim $FFDB Systemuhr setzen 
Das Betriebssystem des CI28 stellt eine Systemuhr zur 
Verfügung, die jeweils im Interrupt fortgeschrieben wird. Mit 
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dieser Routine kann die Uhr auf einen neuen Wert gesetzt 
werden, wobei die Uhrzeit in V 6 o-Sekunden anzugeben ist. 
Eine Sekunde entspricht somit dem Wert 60, eine Minute 
dem Wert 3600undeine Stunde dem Wert 216000. Die Uhr¬ 
zeit ist aus diesen Werten zu errechnen, wobei zum Beispiel 
10 Uhr, 5 Minuten und 20 Sekunden dem Wert 2179200 
entspricht. Diese Zahl ist ins binäre Datenformat umzurech¬ 
nen und in drei Byte der Routine zu übergeben, wobei der 
Akkumulator das höchstwertige Byte enthält. In unserem Bei¬ 
spiel enthalten die Register folgende Werte: 

Akku = 33, XR = 64 und YR = 128, 
denn (33 * 65536) + (64 * 256) + 128 = 2179200. 
krdtim $FFDE Systemuhr nach ac, xr, yr 
Die vom C128 verwaltete Systemuhr kann mit dieser Rou¬ 
tine gelesen werden, wobei die Uhrzeit als Anzahl der seit 
Null Uhr vergangenen V 6 o-Sekunden zu interpretieren ist. 
Eine Beschreibung finden Sie beim vorhergehenden Befehl. 

Die Register enthalten die Werte in der dort angegebenen 
Reihenfolge. 

kstop SFFE1 <RUN/STOP >-Taste lesen 

Durch diese Routine kann festgestellt werden, ob die 

< RUN/STOP >-Taste gedrückt wurde. Nach dem Aufruf der 
Funktion ist das Zero-Flag entsprechend gesetzt, das heißt 
ein BEQ-Befehl direkt nach der Routine verzweigt, wenn die 

< RUN/STOP >-Taste gedrückt wurde. Zu beachten ist, daß 
die Routine auch gleichzeitig - natürlich nur bei gedrückter 

< RUN/STOP >-Taste - die Standard-Ein/Ausgabe-Kanäle 
Tastatur und Bildschirm wieder herstellt, 
kgetin $FFE4 Zeichen vom aktiven Kanal nach AC 

Die Routine liest ein Zeichen vom aktiven Kanal in den 
Akkumulator, also im Normalfall von der Tastatur, es sei denn, 
mit »kchkin« ist der Eingabe-Kanal zuvor auf ein anderes 
Gerät umgeleitet worden. 

S4£R On 


Tips&Tricks 

Vielseitige Hilfen und Erweiterungen erhalten Sie 
regelmäßig in den Tips & Tricks. Neben vielen 
nützlichen Programmen sind diesmal ein komfor¬ 
tabler RENUMBER-Befehl, eine 80-Zeichen-Hard- 
copy mit vielen Finessen und ein leistungsfähiger 
DATA-Wandler dabei. 

D em CI28 fehlen noch viele nützliche Befehle und 
Erweiterungen. Die Rubrik »Tips & Tricks« gibt Ihnen Hil¬ 
fen, neue Basic-Befehle und allerlei nützliche Pro¬ 
gramme an die Hand, die von Profis extra für Sie geschrieben 
wurden, um Ihnen das Arbeiten zu erleichtern. 

LIST-Hilfe für Busic-Programme 


Dieses Programm (Listing 1) ermöglicht ein LISTen von Pro¬ 
grammzeilen mit Hilfe der < CRSR >-Tasten. So wird ein 
unmittelbares Editieren von Programmzeilen möglich, die 
dauernde Eingabe von zum Beispiel »LIST 80-134« überflüs¬ 
sig. Das Programm belegt etwas mehr als 400 Byte im 
Kassetten- und RS232-Eingabepuffer. 

Das Programm wird mit 
BLOAD"LIST-HILFE" 
geladen und durch 
BANK 15:SYS 2816 

gestartet. Das Programm belegt nun die Taste < Fl > mit 
dem Text: 


kclall $FFE7 Filetabelle löschen, Vorgabe-I/O 

Diese Routine setzt zunächst wieder die Standard-Ein/ 
Ausgabe-Kanäle und schließt gleichzeitig alle eventuell offe¬ 
nen Dateien aller Gerätenummern, 
kclock $FFEA Systemuhr aktualisieren 
Diese Routine, die vom Interrupt aufgerufen wird, erhöht 
die Systemuhr um eine V 6 o-Sekunde. Sie sollte nur benutzt 
werden, wenn Sie eine eigene Interrupt-Routine und die 
Systemuhr in Ihrem Programm verwenden. Es muß allerdings 
sichergestellt sein, daß nur der periodisch ausgelöste 
System-Interrupt und nicht etwa Interrupts durch Ein-/ 
Ausgabe-Bausteine diese Routine aufrufen; ansonsten ist 
mit großen Abweichungen in der Genauigkeit der Uhr zu 
rechnen. 

kscror SFFED Bildschirm-Organisation lesen 

Diese Routine ruft die unter den Editor-Funktionen be¬ 
schriebene Funktion »jscorg« auf. 
kplot $FF0 Cursor-Position lesen/schreiben 
Diese Routine ruft die unter den Editor-Funktionen be¬ 
schriebene Funktion »jplot« auf. 
kiobas $FFF3 Basis-Adresse I/O-Bausteine nach xr/yr 
Hiermit erhalten Sie nach dem Aufruf die Basis-Adresse der 
Ein-/Ausgabe-Bausteine ($D000) im X-Register (Low-Byte) 
und Y-Register (High-Byte). 

Damit ist unsere Reise durch das Betriebssystem des 
C128 abgeschlossen. Bleibt nur noch, Ihnen viel Erfolg beim 
kreativen Programmieren mit Ihrem Computer zu wünschen. 
Auch wenn beim ersten Anlauf nicht alles so funktioniert, wie 
Sie es sich vorstellen, lassen Sie den Kopf nicht hängen. Es 
ist noch kein Meister vom Himmel gefallen. (ah) 

Der vorstehende Artikel ist ein Auszug aus dem Buch: 

C128 ROM-Listing, erschienen bei Markt «Technik, Hans-Pinsel-Straße 2,-8013 Haar, Best-Nr.: 
ISBN 3-89090-221-9, Preis: 49 Mark 


zum C128 

BANK 15:SYS 2816 

so daß bei mehrmaliger Initialisierung nur < Fl > gedrückt 
werden muß. 

Die Routine läßt sich mit <RUN/STOP+RESTORE> 
abschalten. 

Eine gleichzeitige Benutzung des Kassettenpuffers oder 
der RS232-Schnittstelle ist nicht möglich, da das Programm 
die Puffer ab $0B00 belegt. Durch Änderung weniger Adres¬ 
sen ist es jedoch leicht möglich, die Routine in einen anderen 
Speicherbereich der BANK 15 zu verschieben. 

Während der normalen Programmier-Tätigkeit macht sich 
das Programm nicht bemerkbar. Wird der Cursor jedoch über 
den oberen oder unteren Bildschirmrand hinausbewegt, tritt 
das Programm in Aktion. 

Steht auf dem sichtbaren Bildschirm eine Zeilennummer 
am linken Rand, wird entweder am unteren Bildschirmende 
die Folgezeile oder am oberen Bildschirmrand die vorherge¬ 
hende Basic-Zeile angezeigt. 

Steht auf dem Bildschirm keine Zeilennummer oder ist die 
erste beziehungsweise letzte Zeile gelistet, scrollt der Bild¬ 
schirm auf- oder abwärts. 

Wurde das Scrollen durch < ESC > + < M > unterbunden, 
wird die entsprechende Basic-Zeile ohne Zeilenverschie¬ 
bung oben beziehungsweise unten in den Bildschirm 
geschrieben, soweit die Zeile hineinpaßt. 

Findet der Editor keine Zeilennummer, springt der Cursor 
bei < ESC > + < M > von der ersten in die letzte Bildschirm¬ 
zeile und umgekehrt (auch dies ist eine Erweiterung der 
normalen Funktion). 
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IO RESTDRE s PRINT "tCTRL+N,CLR>" TAB(20)"CR 
VSON> ÜSI-BitES' 

20 BANK 15: S=0: FOR 1=2816 TD 3231: READ AS 
; POKE I,DEC(AS): S=S+DEC(AS>: NEXT 

30 IF S<>48382 THEN PRINT "I3D0WN,CTRL+0,2SP 
ACE,RVSON>EEHLER IN DEN SATAS !!!": END 

40 BSAVE "LIST-HILFE",ÜN B15,P2816 TO P3231 

2816 DATA A9,80,A2,0B,8D,3C,03,8E,3D,03,A9,8 
F,A2,0C,85,FC 

2832 DATA 86,FD,A2,00,8E,FF,03,E8,A0,0F,A9,F 
C,4C,65,FF,18 

2848 DATA C9,3A,B0,05,E9,2F,38,E9,D0,60,A2,0 
0,86,0A,86,16 

2864 DATA 86,17,E6,0A,E9,2F,85,09,A5,17,85,2 
4,A5,16,0A,26 

2880 DATA 24,0A,26,24,65,16,85,16,A5,24,65,1 
7,85,17,06,16 

2896 DATA 26,17,A5,16,65,09,85,16,90,02,E6,1 
7,20,54,C8,20 

2912 DATA 58,CB,85,FA,18,20,20,0B,90,CB,60,E 
A,EA,EA,A5,EB 

2928 DATA A4,EC,85,FB,84,FC,60,A5,FB,A4,FC,8 
4, EC , 4C , 38, C9 

2944 DATA 85,FE,A6,F4,D0,18,AE,FF,03,D0,7C,C 
0,07,D0,09,A5 

2960 DATA D3,29,01,F0,0B,4C,19,0C,C0,53,F0,F 
9,C0,54,D0,67 

2976 DATA 18,A6,EB,E4,E4,90,60,EE,FF,03,20,6 
E,0B,20,9F,CD 

2992 DATA 24,F8,30,03,20,BC,CA,20,Bl,CB,20,5 
8,CB,20,1F,0B 


3008 DATA 90,0D,18,A6,E5,E4,EB,B0,45,20,70,C 
8 , 4C , B7 , 0B ,18 

3024 DATA 20,2A,0B,E6,16,D0,02,E6,17,20,64,5 
0,B0,02,F0,ID 

3040 DATA A0,02,20,EC,42,85,16,CB,20,EC,42,8 
5,17,A5,FB,A4 

3056 DATA E6,84,EC,20,38,C9,A5,17,A6,16,20,2 
3,51,A9,00,85 

3072 DATA FE,20,77,0B,4E,FF,03,A4,D4,A5,FE,4 
C,AD,C6,24,F8 

3088 DATA 10,04,A6,E5,86,FB,4C,FD,0B,18,A6,E 

5, E4,EB,D0,E7 

3104 DATA EE,FF,03,20,9F,CD,24,F8,30,03,20,C 

A, CA,20,6E,0B 

3120 DATA 20,50,C1,20,58,CB,20,1F,0B,90,0D,1 
8,A6,EB,E4,E4 

3136 DATA B0,42,20,77,C3,4C,33,0C,20,2A,0B,2 
0,64,50,A5,61 

3152 DATA A6,62,C5,2D,D0,04,E4,2E,F0,A3,85,6 
3,86,64,C6,62 

3168 DATA A0,00,C8,F0,9B,20,EC,42,C5,63,D0,F 

6, C8,20,EC,42 

3184 DATA 88,C5,64,D0,ED,18,98,65,61,85,61,A 
9,00,65,62,85 

3200 DATA 62,4C,E0,0B,24,F8,10,04,A6,E4,86,F 

B, 4C,FD,0B,42 

3216 DATA 41,4E,4B,31,35,3A,53,59,53,32,38,3 
1,36,00,00,00 

Listing 1. Komfortableres LISTen eines Basic-Programms 


OObOO 

a9 

80 


lda 

•SBO 

00b02 

a2 

Ob 


ldx 

ISOb 

00b04 

8d 

3c 

03 

sta 

S033c 

00b07 

Be 

3d 

03 

stx 

S033d 

OObOa 

a9 

8f 


lda 

• SBf 

OObOc 

a 2 

Oc 


ldx 

• SOc 

OObOe 

85 

fc 


sta 

*fc 

00b 10 

B6 

fd 


stx 

Sfd 

00b 12 

a 2 

00 


ldx 

•S00 

00b 14 

Be 

ff 

03 

stx 

S03ff 

00b 17 

e8 



inx 


00b 1B 

aO 

Of 


ldy 

ISOf 

00b la 

a9 

fc 


lda 

•Sfc 

OOblc 

4c 

65 

ff 

Jnp 

Sf f 65 

OOblf 

18 



clc 


00b20 

c9 

3a 


cwp 

• S3a 

00b22 

bO 

05 


bcs 

*0b29 

00b24 

e9 

2f 


sbc 

• *2f 

00b26 

3B 



sec 


00b27 

e9 

dO 


sbc 

**d0 

00b29 

60 



rts 


00 b 2 a 

a 2 

00 


ldx 

1*00 

00 b 2 c 

B6 

Oa 


stx 

SOa 

00b2e 

B6 

16 


stx 

*16 

00b30 

B6 

17 


stx 

*17 

00b32 

e6 

Oa 


inc 

* 0 a 

00b34 

e9 

2f 


sbc 

**2f 

00b36 

85 

09 


sta 

*09 

00b38 

a5 

17 


lda 

*17 

00b3a 

85 

24 


sta 

*24 

00b3c 

a5 

16 


lda 

*16 

00b3e 

Oa 



asl 


00b3f 

26 

24 


rol 

*24 

00b41 

Oa 



asl 


00b42 

26 

24 


rol 

*24 

00b44 

65 

16 


ade 

*16 

00b46 

85 

16 


sta 

*16 

00b 4B 

aS 

24 


lda 

*24 

00b4a 

65 

17 


ade 

*17 

00b4c 

85 

17 


sta 

*17 

00b4e 

06 

16 


asl 

*16 

00b50 

26 

17 


rol 

*17 

00b52 

a3 

16 


lda 

*16 

00b54 

65 

09 


ade 

*09 

00b56 

85 

16 


sta 

*16 

00b5B 

90 

02 


bcc 

SObSc 

00b5a 

e6 

17 


inc 

*17 

00b5c 

20 

34 

cB 

' Jsr 

*c854 

00b5f 

20 

58 

cb 

Jsr 

*cb5B 

00b62 

85 

fa 


sta 

*fa 

00b64 

1B 



clc 


00b65 

20 

20 

Ob 

Jsr 

*0b20 

00b6B 

90 

c8 


bcc 

S0b32 

0056a 

60 



rts 


00b6b 

ea 



nop 


00 b 6 c 

ea 



nop 


OObbd 

ea 



nop 


00 b 6 e 

a5 

eb 


lda 

Seb 

00570 

a4 

ec 


ldy Sec 

00572 

85 

fb 


sta 

Sf b 

00574 

84 

fc 


sty Sfc 

00b76 

60 



rts 


00b77 

a5 

fb 


lda 

*fb 

00b79 

a4 

fc 


ldy *fc 

00b7b 

84 

ec 


sty Sec 


Initialisierungsrout me 

Verbiegung des Vektors "Tastendruck speichern" 


Belegung von Fl «it "bankl5:sys2816" 

zur Initialisierung nach Run/Stop - Restore 


6*CR OHL 


Überprüfung des Akku auf Ziffer 


C-Flag wird gesetzt, wenn keine Ziffer 


Integerzahl voo Bildschirs holen (Cursor¬ 
position) nach *16/ *17 
ähnlich der Routine m Bastc-Interpreter ab 

*f50a0 


Cursor rechts 

Zeichen unter Cursor in Akku holen 


Akku auf Ziffer prüfen 

die Routine, wird wiederholt, solange Ziffern 
auf einanderfolgen 


die Cursorpostion wird in *fb/ *fc zwischen- 
gespeichert 


der Cursor wird auf die Ausgangsposition gesetzt 


. 00b7d 4c 

. OObBO 05 
. 00bB2 ab 
. 00bB4 dO 

. 00586 ae 
. 00589 dO 
. 00b8b cO 

'i 

. 00b91 

29 

. 00593 

fO 

. 00b95 

4c 

. 00598 

cO 

. 00b9a 

fO 

. 00b9c 

cO 

. 00b9e 

dO 

. OObaO 

1B 

. OObal 

ab 

. 00ba3 

e4 

. 00ba5 

90 

. 00ba7 

ee 

. OObaa 

20 

. OObad 

20 

. OObbO 

24 

. 00bb2 

30 

. 00bb4 

20 

. 00bb7 

20 

. OObba 

20 

. OObbd 

20 

. OObcO 

90 

. 00 bc 2 

18 

. 00bc3 

a6 

. OObcS 

e4 

. 00bc7 

bO 

. 00bc9 

20 

. OObcc 

4C 

. OObcf 

18 

. OObdO 

20 

. 00bd3 

06 

. OObdS 

tfO 

. 00bd7 

e6 

. 005d9 

20 

. OObdc 

bO 

. OObde 

fO 

. OObeO 

aO 

. 00 be 2 

20 

. 00be5 

85 

. 00be7 

c8 

. OObeB 

20 

. OObeb 

85 

. OObed 

a5 

. OObef 

a4 

. 00bf1 

B4 

. OObf3 

20 

. OObf6 

aS 

. OObf0 

ab 

. OObfa 

20 

. OObfd 

a9 

. OObff 

85 

. OOcOl 

20 

. 00c04 

4e 

. 00c07 

a4 

. 00c09 

a5 

. OOcOb 

4c 

Listing 2 


4c 30 c9 ji»p *c93B 


sta *fe 
ldx Sf4 
bne *0b9e 
J ldx *03ff 
bne *0c07 
cpy 1*07 
bne *Ob90 
lda Sd3 
and #*01 
beq SObaO 
: jap *0c 19 
cpy 1*53 
beq *0b95 
cpy **54 
bne *0c07 
clc 

ldx *eb 
cpx Se4 
bcc *0c07 
5 inc *03ff 
) jsr * 0 b 6 e 
i jsr *cd9f 
bit *fB 
bei *0bb7 
i jsr tcabc 
i jsr *cbbl 
i jsr *cb58 
a jsr SOblf 
bcc * 0 bcf 
clc 

ldx *e5 
cpx Seb 
bcs * 0 c 0 e 
B jsr *cB70 
b jap I0bb7 


clc 
i Ob jsr 
inc 
bne 
inc 
I 50 jsr 
f bcs 
beq 
! * ldy 
: 42 Jsr 

> sta 
iny 

: 42 jsr 
' sta 
) lda 

> ldy 
sty 

1 c9 jsr 
l lda 
i ldx 
5 51 jsr 
) lda 
? sta 
1 Ob jsr 
F 03 lsr 
l ldy 

t lda 

i c6 jap 


die gedrückte Taste wird uberprüft 

die gedrückte Taste wird zwischengespeichert 

springt, wenn Guote-Modus angeschaltet ist 
Zeiger auf "Unterprogrann ist aktiv* 
springt, wenn Unterprograan noch aktiv 
Code für untere Cursortaste 

Speicher für Shift-Taste 


•Cursor up" ist gedrückt 
Code für "Cursor up" 


* 0 b 2 a 

*16 

*0bd9 

*17 

*5064 

SObeO 

*0bfd 

**02 

*42ec 

*16 

*42ec 

*17 

<fb 

*e6 

*ec 

*c938 

*17 

*16 

*5123 

M00 

*fe 

*0b77 

*03f f 

*d4 

*fe 

*c6ad 


Code für “Cursor down“ 
Hauptprograa» "Cursor down" 


springt, wenn Cursor nicht unten in Fenster 
Setzt Hilfszeiger 
Cursorposition speichern 
Cursor ausschalten 


"Scroll up“, falls scroIlen erlaubt 
Cursor an den Anfang der Zeile 
Zeichen von Bildschiro holen 
Zeichen ■ Ziffer ? 
springen bei Ziffer 

Cursor schon in erster Fensterzelle *» 

Ja, dann zun norealen Prograa* sprinqen 
Cursosr up 

Ziffer an linken Bi 1dschirnrand gefunden 

gefundene Zahl lesen, nach Integer Nandeln und 
in *16/ *17 ablegen 
Zahl ue 1 erhöhen 

Anfang der Baeic-Zelle suchen, oder Anfang der 
nächsten Zeile, falls sie nicht exisitlert 
letzte Basiczeile überschritten, dann Ende 

Zellonnuaner der gefundenen Basic-Zeile in 
*16/ *17 ablegen 


Cursor unten links auf den Bildschiro setzen 


Basic-Zeile listen 


alte Cursorpositon holen 
Hilfszeiger löschen 


in noroale Routine springen (Tastencode Zwischen¬ 
speichern) 


Listing 2. Quelltext der LIST-Routine 
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. OOcOt 

24 

fB 


bi t 

448 

Curtor an den oberen Rand setzen, falls scrollen 

. OOclO 

10 

04 


bpi 

* 0 c 16 

verboten 

. 00c12 

a6 

e5 


ldx 

*o5 


. OOcM 

06 

fb 


stx 

*4b 


. 00c16 

4c 

♦ d 

Ob 

J«P 

*0b4d 

Hauptprograa« "Cursor up* 

. 00c19 

18 



clc 



. 00 cla 

a6 

e5 


ldx 

*o5 


. OOclc 

e4 

eb 


cpx 

*eb 


. 00 c le 

d0 

*7 


bne 

*0c07 

springt, nenn Cursor nicht unten la Fenster 

. 00 c 20 

ee 

ff 

03 

inc 

10344 

Setzt Hilfszeiger 

. 00c23 

20 

9f 

cd 

jsr 

$cd94 

Curtor autschalten 

. 0 üc 26 

24 

fS 


bit 

S4G 


. 00c2B 

30 

03 


bai 

I 0 c 2 d 


. 00 c 2 a 

20 

ca 

ca 

>•' 

»caca 

'Scroll down", falls scrollen erlaubt 

. 00 c 2 d 

20 

6e 

Ob 

)»r 

*0b6t» 

Curtorpositlon speichern 

. 00c30 

20 

50 

cl 

jsr 

Je 150 

"Cursor hoao' 

. 00c33 

20 

58 

cb 


febsa 

Zeichen von Bildtchira holen 

. 00c36 

20 

H 

Ob 

J*r 

JObl 4 

Zeichen ■ Ziffer 7 

. 00c39 

90 

oa 


bcc 

$0c4ü 

springen, bei Ziffer 

. 00c3b 

10 



clc 


. 00c3c 

46 

eb 


1 dx 

leb 

Cursor schon ln letzter Fenstorzeile 7 

. 00c3» 

• 4 

• 4 


cpx 

Jo4 


. 00c40 

bO 

42 


bet 

J0c84 

Ja, dann zu* noraalen Prograa« springen 

. 00c4? 

20 

77 

c3 

)•' 

Ic377 

Cursosr down 

. 00c45 

4c 

33 

0c 

j»p 

I0c33 

Ziffer as linken Bi ldschiritrand gefunden 

. 00c4B 

20 

2a 

Ob 

Jtr 

I0b2a 

gefundene Zahl in *16/ *17 ablegen 

. 00 c«b 

20 

64 

50 

)»r 

15064 

Anfang der Batlc-Zelle suchon 

. 00c4t 

45 

61 


1 da 

161 

ist Basic-Zeile die erste Zelle 9 

. OOcSO 

46 

62 


ldx 

162 


. 00c52 

c5 

2d 


cap 

I2d 


. 00c54 

d0 

04 


bne 

J0c5a 


. 00c56 

e4 

2» 


cpx 

*2» 


. 00c58 

fO 

a3 


beq 

JObfd 

ja, dann Ende 

. 00c5a 

B5 

63 


tta 

163 

Zeilenanfang Zwischenspeichern 

. OOcSc 

G6 

64 


BtX 

164 


. OOcSff 

C 6 

62 


dec 

J 62 

Anfang der vorhergehenden Zeile suchen 

. 00 c 60 

a0 

00 


ia, 

1*00 


. 00 c 62 

cB 



i"y 



. OOcl.3 

fO 

90 


beq 

JObfd 

nicht gefunden, dann Ende 

. 00c65 

20 

ec 

42 

J*r 

S42ec 

Zeichen aus Bank 0 holen, Adresse in *61/ *62 

. Oöcfjß 

c5 

63 


c«p 

*63 


. 00 c 6 a 

dO 

46 


bne 

* 0 c 62 


. 00 c 6 c 

cB 



ln, 



. OOc&d 

20 

ec 

42 

Jir 

*42ec 


. 00c70 

9B 



ds. 



. 00c71 

c5 

64 


cap 

*64 


. 00c73 

dO 

od 


bne 

* 0 c 62 


. 00c75 

18 



clc 


Anfang der vorhergehenden Zeile gefunden 

. 00c76 

9B 



iy> 



. 00c77 

65 

61 


ade 

*61 

Zeilonanfang berechnen und in *61/ *62 ablogen 

. 00c79 

B5 

61 


sta 

*61 

. 00c7b 

a9 

00 


lda 

• 100 


. 00c7d 

65 

62 


ade 

*62 


. 00c7f 

B5 

62 


sta 

*62 


. 00 c 81 

4c 

eO 

Ob 

JBp 

* 0 be 0 

gefundene Basic-Zeile listen 

. OOcB4 

24 

48 


bl C 

*48 

Cursor an den unteren Rand setzen, falls^ 

. 00cB6 

10 

04 


bpi 

* 0 cBc 

scrollen verboten 

. OOcBS 

a6 

e4 


ldx 

*e4 


. OOcSa 

86 

fb 


5tX 

*4b 


. OOcBc 

4c 

4d 

Ob 

j«P 

*0b4d 


Listing 2. Quelltext der LIST-Routine (Schluß) 


C64-Modus mit 2 MHz 


»Blanker C64Mode« (Listing 3) wird mit dem MSE im 
C64-Modus eingegeben und durch SYS 49152 gestartet. 
Wenn Sie dann <CTRL+B> kurze Zeit gedrückt halten, 
schaltet sich der FAST-Mode (2-MHz-Betrieb) ein. Dies 
macht sich durch ein Abschalten des Bildschirms bemerkbar. 
In diesem Zustand läuft der CI28 in beiden Betriebsarten 
(C64 und CI28) doppelt so schnell, womit man Compiler 
oder langwierige Berechnungen in Basic beschleunigen 
kann (etwa das Einlesen von DATA-Werten oder das Zeichnen 
hochauflösender Grafik). 

Nochmaliges Drücken von <CTRL+B> schaltet wieder 
auf normale Geschwindigkeit. Durch <RUN/STOP+RE- 
STORE > wird der Blanker abgeschaltet (Neustart durch SYS 
49152). 

Noch zwei wichtige Hinweise: BLANKER läuft nur auf dem 
CI28 im C64-Modus. Außerdem darf der FAST-Modus bei 


Das Programm funktioniert auf dem 40- und 80-Zeichen- 
Bildschirm sowie bei jeder beliebigen Fenstergröße. 

Funktion der Routine 

Die Startroutine bei $0B00 (2816) verbiegt den Vektor 
»TASTENDRUCK SPEICHERN« ($33C/$33D), die der 
Systeminterrupt alle V 6 o Sekunde aufruft. Wird keine Cur¬ 
sortaste erkannt, verzweigt die Routine in die normale 
Abfrage. Andernfalls versucht das Programm festzustellen, 


Listing 3. »Blanker 
64mode« (bitte mit 
dem MSE im C64- 
Modus eingeben) 


Name 

: blanker 64mode 


cOOO c03f 

oOOO 

: 78 

a9 

11 

aO 

cO 

8d 

14 

03 

74 

cO08 

: 8c 

15 

03 

a9 

le 

85 

b6 

58 

ae 

cOlO 

: 60 

a6 

b6 

ca 

86 

b6 

30 

03 

af 

c018 

: 4c 

31 

ea 

a9 

lo 

85 

b6 

a5 

21 

c020 

: cb 

c9 

lc 

dO 

f 3 

a9 

04 

2c 

e6 

c028 

: 8d 

02 

fO 

ec 

ad 

11 

dO 

49 

c9 

c030 

: 10 

8d 

11 

dO 

ad 

30 

dO 

49 

97 

c038 

: Ol 

8d 

30 

dO 

4c 

31 

ea 

ad 

7b 


100 

-! •** BLANKER 

C64-M0DE *•* 


110 

-! »** 



120 

—: 






200 

-.EO 

IROVEC = *0314 t IRQ-VEKTOR 

210 

-.EO 

TASTE 

■ 

*CB ; AKTUELLER TASTENCODE 

220 

-.EO 

ALTIRQ = *EA31 ; ADRESSE DER ALTEN IRQ-ROUTINE 

230 

-.EO 

BLANK 1 = *D011 i VIC 

-REGISTER #17 

240 

-.EO 

BLANK2 = *D030 ; VIC 

-REGISTER #48 

250 

-.EO 

CTRLFL * *028D ; FLAG 

FUER SHIFT.C«.CTRL 

260 

-.EO 

ZAEHL 

■ 

*B6 : ZAEHLER 

270 







280 

—. BA 

*COOO 

: AB 49152 ABLEGEN 

290 

“1 






300 

“1 






310 

—. INITIALISIERUNG DER NEUEN IRQ-ROUTINE 

320 







330 



SEI 


; 

INTERRUPT ABSCHALTEN 

340 







350 



LDA 

#<(NEUIRQ) 

; 

IRQ-VEKTQR 

360 

- 


LDY 

• XNEUIRQ) 

; 

AUF NEUE 

370 

- 


STA 

IROVEC 

i 

IRQ-ROUTINE 

380 

— 


STY 

IRQVEC+1 

; 

STELLEN 

4« 


LDA 

#30 



410 

— 


STA 

ZAEHL 

• 

ZAEHLER SETZEN 

400 







410 

- 


CLI 


; 

INTERRUPT WIEDER EINSCHALTEN 

420 

— 


RTS 


; 

ENDE DER INITIALISIERUNG 

430 

"5 






440 

-NEUIRQ 

LDX 

ZAEHL 



450 

— 


DEX 




460 

— 


STX 

ZAEHL 

; 

ZAEHLER DEKREMENTIEREN 

470 

— 


BMI 

PRUEF 



480 

-ENDEIRO 

JMP 

ALT IRQ 

• 

WEITER WIE BEI ALTEM IRQ 

485 

-5 






490 

-PRUEF 

LDA 

#30 



500 

— 


STA 

ZAEHL 

I 

ZAEHLER WIEDER SETZEN 

505 







510 



LDA 

TASTE 



520 

- 


CMP 

«28 

1 

AUF "B" PRUEFEN 

530. 

— 


BNE 

ENDEIRO 

1 

ENDE WENN <> "B" 

535 

-j 






540 

— 


LDA 

#4 

1 

BIT FUER "CTRL" GESETZT 

550 

— 


BIT 

CTRLFL 

* 

AUF CTRL-TASTE PRUEFEN 

560 

— 


BEQ 

ENDEIRO 

1 

NICHT CTRL GEDRUECKT, DANN ENDE 

565 

“5 






570 

— 


LDA 

BLANK1 



500 

- 


EQR 

«16 

* 

BLANK-BIT FLIPPEN 

590 

— 


STA 

BLANK1 

; 

UND ABSPEICHERN 

595 

- j 






6U0 

- 


LDA 

BLANK2 



610 

- 


EOR 

«1 

; 

FAST-BIT INVERTIEREN 

620 

— 


STA 

BLANK2 

s 

UND ABSPEICHERN 

625 

-1 






630 

“ 


JMP 

ALT IRQ 

i 

WEITER BEIM ALTEN IRO 

Listing 4 

Kommentierter Quelltext von »Blanker 64mode« 


ob eine Zeilennummer auf dem Bildschirm steht und ob es 
eine Fölgezeile oder vorhergehende Zeile im Basic-Pro- 
gramm gibt (die genaue Funktion dieser Abfrage entnehmen 
Sie bitte dem kommentierten Quellcode aus Listing 2). 

Der Zeiger $3FF wird bei Programmbeginn als Flag 
gesetzt. Wenn er gesetzt ist, wird das Programm nicht erneut 
angesprungen. Dies ist notwendig, da das LISTen einer 
Basic-Zeile häufig länger als ’/eo Sekunde dauert. Die Rou¬ 
tine würde sich dann immer wieder selbst aufrufen, was zu 
einer Endlosschleife oder Programmabsturz führt. 

(Ralf Pfeiffer/dm) 


Listing 5. 

Der lOer-Block läßt 
sich auch im 
C64-Modus sinnvoll 
nutzen (bitte mit 
dem MSE im 
C64-Modus 
eingeben) 


Naue 

lOer-tast 



cOOO c088 

cOOO 

78 

a9 

Od 

aO 

cO 

8d 

14 

03 

73 

c008 

8c 

15 

03 

58 

60 

78 

a9 

ff 

5b 

cOlO 

8d 

00 

de 

a9 

00 

8d 

03 

de 

3c 

c018 

8d 

2f 

dO 

ad 

01 

de 

c9 

ff 

45 

c020 

fO 

47 

a2 

02 

a9 

fe 

aO 

07 

cO 

c028 

8d 

2f 

dO 

ad 

01 

de 

cd 

01 

67 

c030 

de 

dO 

f 8 

6a 

90 

Of 

88 

10 

c3 

c038 

fa 

ad 

2f 

dO 

29 

07 

2a 

ca 

<8 

c040 

10 

e4 

4c 

69 

cO 

18 

8a 

Oa 

Oe 

c048 

Oa 

Oa 

85 

ff 

98 

65 

ff 

aa 

c3 

c050 

bd 

70 

cO 

c5 

fe 

fO 

05 

85 

c5 

c058 

fe 

20 

35 

eb 

a9 

7f 

8d 

00 

fe 

c060 

de 

a9 

ff 

8d 

2f 

dO 

4c 

31 

cf 

c068 

ea 

a9 

00 

85 

fe 

4c 

5c 

cO 

ld 

c070 

13 

ld 

9d 

11 

91 

2c 

30 

8d 

f 2 

c078 

33 

39 

36 

Od 

Oa 

2d 

2b 

lb 

64 

c080 

31 

37 

34 

32 

09 

35 

38 

3f 

3a 
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TIPS&TRICKS 


Ansteuerung von Peripheriegeräten nicht eingeschaltet sein, 
da dies zu I/O-Fehlern führt. 

Assembler-Freaks können aus dem kommentierten 
Assembler-Listing (Listing 4) interessante Informationen ent¬ 
nehmen. (Florian Müller/dm) 

1 Oer-Block auch im C64-Modus 


Wer einen C128 besitzt und diesen im C 64-Modus benutzt, 
dem wird bestimmt schon aufgefallen sein, daß der 10er- 
Block und die zusätzlichen Cursortasten nicht ansprechbar 
sind. Das hier abgedruckte Maschinenprogramm (Listing 5, 
bitte mit dem MSE im C 64-Modus eingeben) behebt dieses 
kleine Übel. 

Der Video-Chip im CI28 unterscheidet sich von seinem 
Vorgänger unter anderem dadurch, daß er einen 3-Bit-Port 
besitzt, ähnlich dem in der CPU oder in den CIAs. Dieser Port 
hat im CI28 die Aufgabe, die zusätzlichen Ziffern-, Cursor- 
und Steuertasten abzufragen. 

Die im C 64-Modus nutzbare Tastatur ist über je acht 
Spalten- und Zeilenleitungen mit den beiden Ports des CIA 1 
verbunden. Die fehlenden drei Zeilenleitungen für die Zusatz¬ 
tasten werden am VIC angeschlossen. Aus Kompatibilitäts¬ 
gründen ist diese Tastatur im C 64-Modus nicht aktiv, denn 
das Betriebssystem müßte ja diesen VIC-Port unterstützen. 
Genau hier greift 10ER-TAST ein. 

Der Interrupt-Vektor wird auf die neue Routine verbogen 
und die normale Tastatur vorerst »abgeklemmt«. Nun legt das 
Programm alle drei Tastaturzeilen im VIC auf LOW. Ist eine der 
Zusatztasten gedrückt, so erscheint an CIA 1, Port B, etwas 
anderes als $FF. Ist dies der Fall, werden nacheinander alle 
drei Zeilen einzeln auf LOW gelegt und überprüft, ob diese 
Zeile angesprochen wurde. S46R C 

Ist die Zeile mit der gedrückten Taste gefunden, wird noch 
ermittelt, in welcher Spalte die Taste liegt. Aus den Werten für 
Zeile und Spalte errechnet sich die Position des zugehörigen 
ASCII-Zeichens in der Tastaturtabelle. Dieser Code wird nun 
in den Tastaturpuffer gebracht und erscheint danach auf dem 
Bildschirm. 

Der Start des Programms erfolgt durch SYS 49152. Sofort 
ist der gesamte Zehnerblock im C 64-Modus nutzbar. 

(Achim Kalwa/dm) 

Variablen-Übersicht 


Mit dem Programm »XLV 3.6« (Listing 6) werden sämtliche 
Variablen, die ein Programm verwendet, sortiert auf dem 
Drucker ausgegeben. Zu jeder Variable werden sämtliche 
Zeilennummern, in denen die Variable vorkommt, mit ausge¬ 
geben. 

Die Unterteilung der Variablen erfolgt in die vier Gruppen 
Systemvariable und Konstanten, numerische Gleitkomma- 
Variable, numerische Ganzzahl-Variable und Zeichenketten- 
Variable. 

Für jede Gruppe können je 51 Variable und für jede Variable 
je 127 Zeilennummern verarbeitet werden. Zum Anschluß 
eignet sich jeder beliebige Drucker (auf die Verwendung 
druckerspezifischer Steuerkommandos wurde verzichtet). 

Bedienung 

Das Programm ist durch 

RUN"XLV# " 

zu starten. Mit »$« können alle Programme auf der Diskette 
angezeigt werden. 

Gewünschten Programmnamen eingeben. (Bei Programm¬ 
namen mit mehr als 14 Zeichen bitte mit »*« abkürzen, da 
sonst ein STRING TOO LONG-Error auftritt.) 

Sofern der Drucker noch nicht eingeschaltet ist, wird dies 


10 P*="XLV 3.6“: REM 09.07.B& * R. VOGEL * C 
H-0B87 MELS 

20 TRAP B30: DCLDSE : COLOR 0,1s COLOR 4,1: 

PRINT “{2H0ME,CLR}";: E*=CHR*(27)s CR*=CH 
R* <13) 

30 IF PEEK <215)>0 THEN FAST s CHAR 1,1B,0,E* 

+ "T" 

40 T 0 $= ■■ {5space 

50 PRINT "{WHITEJVARIABLEN UEBERSICHT{4SPACE 
}"P*CR* MID*(T0*,6,31)CR*"{PURPLE}'*' = D 
IRECTORY{2SPACE>'E'=ENDE{DOWN >" 

60 OPEN 3,0: DIM TA*(52,3): DIM T*<3): GOTO 
120 

70 REM #### SUB READ #### 

B0 GET #1 ,X*: S7.=ST: X7.=ASC(X*>: RETURN 
90 PRINT CR*" {3UP >"E*"Q{CTRL+G>'"F* ,, 'IST KEI 
N BASIC PGM{DOWN>": GOTO 120 
100 PRINT CR*"{3UP>"E*"Q{CTRL+G>PGM '"F*”' N 
ICHT GEFUNDEN{DOWN>" 

110 REM #### START PGM #### 

120 DCLOSE : PRINT "PBM-NAME ODER '*': “ 5 : I 
NPUT#3,F*: IF F*="E" THEN B00 
130 IF F*="*" THEN PRINT "{WHITE}": CATALOG 
"*=P" 

135 IF F*="*“ THEN PRINT "{PURPLE>'RET' = WE 
ITER";: GET KEY Y*: CLR : GOTO 10 
140 DOPEN #1,(F*)+",P": IF DS>0 THEN 100 
150 GOSUB B0: IF XXOl THEN 90 
160 GOSUB 80: IF XX02B THEN 90: ELSE EX=1: 
M7.= l 

170 PRINT CR*"{DOWN>BITTE GEDULD" 

180 REM #### LOOP PGM LESEN #### 

190 DO UNTIL S7.>0: GOSUB 80: IF E7. THEN 290 

200 IF RX AND XX>0 THEN 330 

210 IF DX AND XX<>34 AND XX>0 THEN 330 

220 IF XX=34 AND QX=0 THEN QX=1: PX=1: MX=0: 

10c* GDTD 260 

230”:- XX=34 THEN QX=0: MX=1: GOTO 330 
240 IF X*=”:" THEN MX=0s PRINT "{LIG.GREEN}: 

";: GOTO 260 

250 IF <XX<255 AND XX>127> OR XX<32 THEN : MX 
=0: IF XX=143 THEN RX=1: PX=ls PRINT "{L 
IG.REDIREM"; 

260 GOSUB 350: IF PX THEN PX=0: GOTO 330 
270 IF X*=”:" 0R(XX<255 AND XX>127) OR XX<32 
THEN MX=1 

280 IF XX>0 THEN 330 

290 EX=EX+1: ON EX GOTO 330,330,330,300,310 
300 Z0*=CHR*(XX): WX=XXs GOTO 330 
310 Z1*=CHR*(XX): WX=WX+256*XX: EX=0: QX=0: 
RX=0 

320 CHAR 1,0,8,E*+"D”: CHAR 1,0,22,"{LIG.BLU 
E}": PRINT USING “#####";WXj: PRINT " 

330 LOOP : DCLOSE : GOTO 600 
340 REM #### VARIABLEN SUCHEN #### 

350 IF MX THEN ZX=ZX+1: ELSE BOTO 460 
360 IF ZX=1 AND((X*=>"A" AND X*=<"Z"> OR XX= 
255) THEN Z*=X*: LX=1: RETURN 
370 IF ZX=1 THEN ZX=0: RETURN 
380 IF X*="(" THEN Z*=Z*+X*: GOTO 460 
390 IF X*="X" OR X*="*" THEN Z*=Z*+X*: LX=2: 
AX-1: RETURN 

400 IF(X*>="0“ AND X*<="9") OR(X*>="A" AND X 
*<="Z") THEN 420 
410 GOTO 460 

420 IF AX THEN GOSUB 460: GOTO 350 
430 IF LX=1 THEN Z*=Z*+X*s LX=2 
440 RETURN 

450 REM #### BUFFER SCHREIBEN #### 

460 IF ZX=0 THEN RETURN 

470 VA*=":{4SPACE}": MID*(VA*,2)=Z*: ZX=0: A 
X=0: ZL*=Z1*+Z0* 

480 IF INSTR(":DS{2SPACE}:DS* :EL{2SPACE}:ER 
{2SPACE}:t{3SPACE}:ST{2SPACE}:TI{2SPACE} 
:TI* ",VA*)>0 THEN 

PRINT "{YELLOW}*";: VX=0: GOTO 510 

Listing 6. »XLV 3.6« - leistungsfähiger Variablen-Dump 
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490 IF INSTR(VA*,"*">>0 THEN PRINT "{YELLQW} 
*";: V'/.=3: GOTO 510 

500 IF INSTR (VA*, “ 7 ." ) >0 THEN PRINT " {YELLOW> 
7.";: V7.=2s ELSE PRINT " {YELLOW}#“; : V7.=l 
510 T7.= INSTR(T*(V/.> ,VA*) : IF T7.=0 THEN T*(V7. 
)=T*(V'/.)+VA*: GOTO 510 

520 I7.= (T7.-l)/5: IF RIGHT* (TA* (I'/., V/.> ,2) =ZL* 
THEN 540 

53@ TA* (17., V7.) =TA* (17., V7.) +ZL* 

540 RETURN 

550 REM #### DRUCKER NICHT READY #### 

560 CLOSE 4: CHAR 1,0,8,E*+"D"+E*+"D" 

570 CHAR 1,0,21,”{PURPLEJBITTE DRUCKER EINSC 
HALTEN UND"+CR*+"'RET' DRUECKEN.{2SPACEJ 
(E=ENDE)" 

580 GET KEY Y*a IF Y*="E" THEN 790 
590 REM ##H# BUFFER DRUCKEN ###tt 
600 OPEN 4,4: PRINT#4,"{5SPACEJPROGRAMMNAME 
:{3SPACE>"F*: PRINT#4,T0* 

610 IF STO0 THEN 560: ELSE PRINT#4 
620 FOR V=0 TO 3: IF T*(V)="” THEN 780 
630 PRINT#4,"{5SPACE} " ; 

640 IF V=0 THEN PRINT#4,"SYSTEMVARIABLEN UND 
KONSTANTEN”? 

650 IF V=1 THEN PRINT#4,"NUMERISCHE GLEITKOM 
MA VARIABLEN"; 

660 IF V=2 THEN PRINT#4,"NUMERISCHE GANZZAHL 
VARIABLEN"; 

670 IF V=3 THEN PRINT44,"ZEICHENKETTEN VARIA 
BLEN"; 

680 PRINT#4," :": PRINT#4,T0* 

690 FOR 1=0 TO LEN(T*(V)1/5-1 


700 Y*=" .t.t_t_t “5 FOR Y=0 TO LEN (T* (V) > /5-1 
710 IF Y*>MID*(T*(V),Y*5+2,4) THEN Y*=MID*(T 
*(V) ,Y*5+2,4) : Y7.=Y 

720 NEXT Y: MID* (T* (V) . Y7*5+2 T 4) = " ■».♦.»■». " : PRI 
NT#4,Y*" —"5 

730 FOR J=0 TO LEN(TA*(Y7.,V) >/2-l 
740 IF INT(J/12>=J/12 AND J>0 THEN PRINT44: 
PRINT#4,”{5SPACEJ-"; 

750 PRINT#4, US ING "######"; (ASC (MID* (TA* (Y7., 
V) ,J*2+1,1> )*256)+ASC(MID*(TA*(Y7.,V) ,J*2 
+ 2 ,l))j 

760 NEXT J: PRINT44: PRINT#4 
770 NEXT I: PRINT#4: PRINT#4 
780 NEXT V: CLOSE 4 

790 PRINT CR*"{PURPLEJFERTIG! 'RET'=ENDE{2SP 
ACE>’R’=RESTART": GET KEY Y*: IF Y*="R" 
THEN CLR : GOTO 10 

800 FF*="MENU": DOPEN #2,(FF*): DCLOSE : IF 
DS=0 THEN RUN "MENU" 

810 PRINT "{CLR>";: END 
820 REM #### ERROR #### 

830 PRINT "{CLR,PURPLE!*** ERROR *** " ERR*( 
ER)" IN LINIE "EL; 

840 HELP : PRINT 

850 PRINT “'RET'=RETRY (RESUME), SONST = ABB 
RUCH GET KEY Y* 

860 IF Y*=CHR* 

Listing 6. Dieses Programm dient der Ausgabe aller in 
einem Basic-Programm verwendeten Variablen auf einem 
Drucker (Schluß) 


nun angezeigt. Ist der Drucker bereit, so werden die Variablen 
sortiert ausgedruckt. (R. Vogel/dm) 

80-Zeichen-Hardcopy 


Für den 40-Zeichen-Modus gibt es genug Hardcopy- 
Programme, die man nötigenfalls auch umschreiben kann. 
Für den 80-Zeichen-Modus sind jedoch spezielle Hardcopy- 
Routinen nötig, die es aber derzeit noch nicht so häufig gibt. 
Mit diesem Programm »VDCHC.OCOO« (Listing 7, bitte mit 
dem MSE im C64-Modus eingeben) erhalten Sie eine 
80-Zeichen-Hardcopy-Routine mit folgenden Vorzügen: 

- Die Attribute »zweiter Zeichensatz an« (Bit 7), »Revers« 
(Bit 6) und »Unterstrichen« (Bit 5) des Attributspeichers wer¬ 
den mit berücksichtigt. Sollte der Attributspeicher abge¬ 
schaltet sein (Bit 6 des VDC-Registers 25 ist Null), erkennt 
dies das Programm und ignoriert die Attribute. 

- Veränderte Adressen für Bildschirmspeicher (Register 


12), Attributspeicher (Register 20) und Zeichensatz (Regi¬ 
ster 28, Bits 5 bis 7) werden berücksichtigt. Die Hardcopy- 
Routine wertet die Register 13 und 21 nicht aus, da das 
Betrieb System des C128 nur eine Verschiebung um ganze 
Speicherseiten (Page) vorsieht. 

- Auch veränderte oder selbst erstellte Zeichensätze wer¬ 
den erkannt und ausgedruckt. Das Programm arbeitet beim 
Ausdruck grundsätzlich im Bitmap-Modus (640-Pixel-Grafik 
bei Epson-Druckern und Kompatiblen) und holt die 
Bitmuster-Daten nicht aus dem Zeichensatz-ROM, sondern 
aus dem VDC-RAM. 

- Ebenfalls verarbeitet die Routine ein verändertes Bild¬ 
schirmformat. Die Anzahl der dargestellten Zeilen wird aus 
dem Register 6 des VDC geholt, so daß alles auf dem Papier 
erscheint, was auf dem Bildschirm zu sehen ist. Die Anzahl 
der Zeichen je Zeile muß jedoch immer 80 betragen; bei 
anderen Formaten spielt nicht nur dieses Programm, sondern 
auch das Betriebssystem des C128 nicht mit, so daß diese 
Einschränkung nicht ins Gewicht fällt. 


Name : vdchc.OcOO OcOO Odff 


OcOO : 

78 

a9 

2b 

8d 

14 

03 

a9 

Oc 

el 

0c08 : 

8d 

15 

03 

58 

20 

7d 

ff 

Oe 

f 6 

OclO : 

d6 

c4 

c3 

2d 

c8 

41 

52 

44 

47 

0cl8 : 

43 

4f 

50 

59 

20 

4d 

49 

54 

7c 

OcZO : 

20 

27 

cl 

cc 

d4 

27 

21 

07 

f 7 

0c28 : 

Od 

00 

60 

a5 

d3 

29 

08 

fO 

8b 

0c30 : 

17 

a9 

65 

8d 

14 

03 

a9 

fa 

ld 

0c38 : 

8d 

15 

03 

20 

4b 

Oc 

a9 

2b 

27 

0c40 : 

8d 

14 

03 

a9 

Oc 

8d 

15 

03 

55 

0c48 : 

4c 

65 

fa 

ad 

00 

ff 

8d 

92 

16 

OcbO : 

Od 

a9 

00 

8d 

00 

ff 

a2 

ff 

6e 

0c58 : 

b5 

00 

9d 

00 

Ob 

ca 

dO 

f 8 

bl 

0c60 : 

a2 

lc 

20 

da 

cd 

29 

eO 

85 

28 

0c68 : 

fe 

a2 

06 

20 

da 

cd 

85 

8f 

8e 

0c70 : 

a2 

Oc 

20 

da 

cd 

85 

fb 

a2 

ba 

Oc78 : 

14 

20 

da 

cd 

85 

fd 

a9 

00 

fb 

0c80 : 

85 

fa 

85 

fc 

a2 

19 

20 

da 

ac 

0c88 : 

cd 

aa 

29 

80 

fO 

03 

4c 

87 

6c 

0c90 : 

Od 

a9 

20 

8d 

01 

Od 

a9 

20 

8b 

0c98 : 

8d 

15 

Od 

8a 

29 

40 

dO 

Oa 

30 

OcaO : 

a9 

2c 

8d 

01 

Od 

a9 

2c 

8d 

cd 

0ca8 : 

15 

Od 

a9 

7f 

a2 

04 

aO 

01 

6d 

OcbO : 

20 

ba 

ff 

a9 

00 

20 

bd 

ff 

5a 


0cb8 

20 

cO 

ff 

a2 

7f 

20 

c9 

ff 

ad 

OccO 

20 

7d 

ff 

lb 

33 

18 

00 

a9 

49 

0cc8 

50 

85 

8e 

20 

7d 

ff 

lb 

2a 

lb 

OcdO 

04 

80 

02 

00 

a2 

fa 

20 

c4 

al 

0cd8 

Od 

85 

66 

a2 

fc 

20 

c4 

Od 

94 

OceO 

85 

67 

ab 

66 

85 

64 

a9 

00 

71 

0ce8 

85 

65 

06 

64 

26 

65 

06 

64 

9c 

OcfO 

26 

65 

06 

64 

26 

65 

06 

64 

45 

0cf8 

26 

65 

a5 

fe 

18 

65 

65 

85 

67 

OdOO 

65 

20 

97 

Od 

aO 

00 

a2 

64 

5a 

0d08 

20 

c4 

Od 

99 

ef 

Od 

c8 

e6 

59 

OdlO 

64 

cO 

08 

dO 

fl 

20 

a5 

Od 

cl 

Odl 8 

a2 

07 

a9 

00 

9d 

f 7 

Od 

ca 

Oc 

0d20, 

10 

fa 

aO 

07 

b9 

ef 

Od 

85 

11 

0d28 

68 

a2 

07 

a5 

68 

3d 

df 

Od 

62 

0d30 

fO 

09 

bd 

f 7 

Od 

19 

e7 

Od 

66 

Od38 

9d 

f 7 

Od 

ca 

10 

ed 

88 

10 

20 

0d40 

e3 

a2 

07 

bd 

f 7 

Od 

20 

d2 

fc 

0d48 

ff 

ca 

10 

f 7 

a5 

fa 

18 

69 

15 

0d50 

01 

85 

fa 

a5 

fb 

69 

00 

85 

9d 

0d58 

fb 

a5 

fc 

18 

69 

01 

85 

fc 

17 

0d60 

a5 

fd 

69 

00 

85 

fd 

a6 

8e 

5e 

0d68 

ca 

86 

8e 

fO 

03 

4c 

d4 

Oc 

35 

0d70 

a9 

Od 

20 

d2 

ff 

a6 

8f 

ca 

Ob 

0d78 

86 

8f 

fO 

03 

4c 

c7 

Oc 

20 

d6 


0d80 

cc 

ff 

a9 

7f 

20 

c3 

ff 

a2 

Ob 

0d88 

ff 

bd 

00 

Ob 

95 

00 

ca 

dO 

ed 

0d90 

f8 

a9 

00 

8d 

00 

ff 

60 

a5 

db 

0d98 

67 

29 

80 

fO 

07 

a5 

65 

18 

35 

OdaO 

69 

10 

85 

65 

60 

a5 

67 

29 

42 

0da8 

20 

fO 

05 

a9 

ff 

8d 

f6 

Od 

19 

OdbO 

a5 

67 

29 

40 

fO 

Od 

a2 

07 

6b 

0db8 

bd 

ef 

Od 

49 

ff 

9d 

ef 

Od 

aO 

OdcO 

ca 

10 

f 5 

60 

8e 

d5 

Od 

e8 

b9 

0dc8 

8e 

ce 

Od 

a2 

12 

a5 

00 

20 

e4 

OddO 

cc 

cd 

a2 

13 

a5 

00 

20 

cc 

02 

0dd8 

cd 

a2 

lf 

20 

da 

cd 

60 

01 

62 

OdeO 

02 

04 

08 

10 

20 

40 

80 

80 

fO 

0de8 

40 

20 

10 

08 

04 

02 

01 

00 

92 

OdfO 

00 

00 

00 

00 

00 

00 

00 

00 

fl 

Odf 8 

00 

00 

00 

00 

00 

00 

00 

a9 

4c 


Listing 7. Hardcopy-Routine zur 
Darstellung der 80-Zeichen-Grafik 
(bitte mit dem MSE im C64-Modus 
eingeben) 
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Das Programm erkennt nicht: 

- Farben auf dem Bildschirm und blinkende Darstellung. Da 
die Auflösung des Druckers beschränkt ist, wurde auf Grau¬ 
töne zugunsten besserer Lesbarkeit und geringerem Spei¬ 
cherplatzverbrauch verzichtet. 

- Die komplette Invertierung des Bildschirms durch Bit 6 
des Registers 24, was allerdings auch eine große Belastung 
für das Farbband gewesen wäre. 


gramme mit dem Hardcopy-Programm. Man muß sich aber 
davor hüten, während Kassettenoperationen eine Hardcopy 
auszulösen. (Frank-Ch. Krügel/dm) 


Grafik-Spielereien 


80 RF=2: REM RANDFARBE 
90 SCNCLR 

100 PRINT "NACH BEENDIGUNG JEDER GRAPHIK 
110 PRINT "WECHSELT DIE RANDFARBE. 

120 PRINT "DANN TASTE DRUECKEN 
130 SLEEP 5 
140 GRAPHIC 1,1 

150 COLOR 1,16: CDLOR 0,1: CDLOR 4,RF 
155 X=1 

160 DO UNTIL X>=44 

170 CIRCLE 1,X*8,20»SIN(37*X/70)+B0,30,30,,, 

,20 

180 X=X+0.7 
190 LOOP 
200 RF=RF+1 
210 COLOR 4,RF 
220 SET'KEY A* 

230 GRAPHIC 1,1 
235 X=1 

240 DO UNTIL X>=228 
250 Y=Y+0.7 

260 CIRCLE 1,X+30+50*SIN<X/5-0.2),Y,30,30,,, 
,90 

270 X=X+0.7 
280 LOOP 
290 RF=RF+1 
300 COLOR 4,RF 
310 GET KEY AS 
320 GRAPHIC 1,1 
325 X=1 
330 DO UNTIL X>=230 

340 CIRCLE l,50*SIN(X/20—0.2)+X+10.X,40,20,, 
, X ,20 

350 X=X+3.5 
360 LOOP 
370 RF=RF+1 
380 COLOR 4,RF 
390 GET KEY AS 
400 GRAPHIC 0 

Listing 8. Grafik-Spielereien mit dem C128 


£■46 Fl 


Das kleine Programm »GRAFIKEN« (Listing 8) erstellt drei 
HiRes-Grafiken für den C128 mittels der Sinusfunktion und 
des CIRCLE-Befehls. Der Segmentwinkel 20 (bei den Figu¬ 
ren 1 und 3) beschleunigt das Zeichnen der Kreise erheblich, 
ohne dabei ihre Form zu verändern. 

Durch Ändern der Parameter oder der Funktion lassen sich 
unzählige Variationen entwickeln. 

(Stephan Hartmann/dm) 

Vielseitiges RENUMBER 


Die Überschrift klingt im ersten Augenblick wie ein Eigentor, 
da der CI28 bereits mit einer RENUMBER-Routine ausge¬ 
stattet ist. Diese Funktion benötigt leider selbst im FAST- 
Modus viel Zeit. Bei einem Programm von etwa 30 KByte 
Länge beispielsweise mehr als vier Minuten. 

Immerhin, mit der Geschwindigkeit könnte man leben, 
gäbe es da nicht einen zweiten Punkt. Mit der RENUMBER- 
Routine des C128 läßt sich ein Programm nicht neu durch¬ 
strukturieren, da die Reihenfolge der Programmzeilen nicht 
verändert wird. 

Die hier vorgestellte Routine hingegen ermöglicht es nicht 
nur, Programmabschnitte neu durchzunumerieren, sondern 
man kann mit ihr auch Programmteile verschieben. Zum Bei¬ 
spiel Unterroutinen an das Programmende. Wer viel in Basic 
programmiert, weiß, wieviel »Handarbeit« man sich dadurch 
ersparen kann. 

Eingabe und Start 

Bitte tippen Sie zuerst den Basic-Lader (Listing 9) ab und 
starten das Programm durch RUN. Jede Zeile ist mit Prüfsum¬ 
men versehen. Bei fehlerhaften Zeilen wird ein »PRÜFSUM¬ 
MENFEHLER IN XX« ausgegeben. Sobald der Computer alle 
DATA-Zeilen akzeptiert hat, speichern Sie das Programm. 
Starten Sie anschließend den veränderten RENUMBER- 
Befehl mit SYS 4888. 


- Den Bitmap-Modus des C128. Startet man dieses Pro¬ 
gramm trotzdem, während der Bitmap-Modus aktiv ist, so 
erkennt dies das Programm und startet den Ausdruck gar 
nicht. Der Grund für das Fehlen einer Grafik-Hardcopy ist der 
Speicherplatz. Das Programm hätte dann in einen anderen 
Speicherbereich gelegt werden müssen (zum Beispiel ab 
$1300 oder $2000), der aber oft von anderen Programmen 
belegt ist. 

Programm-Bedienung 

Geladen und gestartet wird das Programm mit 

BOOT"VDCHC.0C00" 

oder 

BLOAD"VDCHC.0C00":SYS 3072 

Danach ist es in den Interrupt eingebunden. Eine Hardcopy 
erfolgt dann durch Druck auf < ALT> oder von einem Pro¬ 
gramm aus durch SYS 3147. < RUN/STOP+RESTORE > 
desaktiviert das Programm wieder. Ein Neustart ist mit SYS 
3072 möglich. 

Da die RS232-Puffer recht selten gebraucht werden, ist 
das Programm dort untergebracht. Es belegt den Speicher¬ 
bereich von $00C00 bis $00DFE. Weiterhin wird der Kas¬ 
settenpuffer als Zwischenspeicher für die Zeropage belegt, 
die während des Programmablaufs nach dorthin ausgelagert 
ist. Da der Kassettenpuffer nicht ständig benötigt wird, wäh¬ 
rend dieses Programm aktiv ist, funktionieren Kassettenpro- 


85 REM PROGRAMM-AUFRUF: SYS 4888 
90 : 

100 READ D* : AD=DEC<D*> : ZL=1001 

110 FOR 1=1 TO 10 : READ D* : D=DEC(DS) 

120 SU=SU+D : POKE AD,D : AD=AD+1 

130 NEXT : READ P* : PR=DEC(P*> 

140 D=PR-32768 : IF D=>0 THEN PR=D 

150 IF PROSU THEN PRINT "FEHLER IN",ZL: STOP 
160 ZL=ZL+1: SU=0: IF D<0 THEN 110: ELSE END 
170 : 

180 : 

190 : 

1000 DATA 1300 

1001 DATA EA,EA,EA,EA,EA,EA,EA,EA,EA,EA, 0924 

1002 DATA EA,EA,EA,EA,EA,EA,EA,EA,EA,EA, 0924 

1003 DATA EA,EA,EA,EA,EA,A9,2D,8D,04,03, 05FC 

1004 DATA A9,1B,8D,05,03,A9,34,8D,00,03, 02CB 

1005 DATA A9,13,8D,09,03,60,8D,03,FF,58, 039C 

1006 DATA 68,AA,20,CF,1B,C9,FB,F0,03,4C, 0519 

1007 DATA A2,4A,8A,48,A0,07,B9,95,19,99, 0465 
100B DATA A7,19,88,10,F7,BB,84,FC,84,FD, 05DB 

1009 DATA A0,00,84,FA,B4,FB,20,E5,1B,B0, 056A 

1010 DATA 27,BC,A7,19,8D,A8,19,20,EB,1B, 03E1 

1011 DATA B0,1B,BC,A9,19,8D,AA,19,20,E8, 046E 

1012 DATA 18,B0,0D,84,FA,85,FB,20,EB,18, 04F3 


Listing 9. Ein RENUMBER-Befehl, der auch 
Programmbereiche verschiebt 



SONDERHEFT 10 


153 











TIPS&TRICKS 


C 128 


1013 

DATA 

B0,04,84,FC,85,FD,A0,FF,C6,3E, 

0659 

1094 

DATA 

16,48,CB,BA,91,16,68,85,16,86, 

03E0 

1614 

DATA 

20,DA,18,78,20,0F,14,8D,01,FF, 

035A 

1095 

DATA 

17,4C,82,16,A0,00,91,16,60,20, 

02C2 

1015 

DATA 

20,05,19,20,79,16,A5,2A,05,2B, 

01EC 

1096 

DATA 

66,18,D0,05,20,D2,16,F0,0D,A0, 

03F8 

1016 

DATA 

F0,6B,18,A9,04,65,2A,90,02,E6, 

0427 

1097 

DATA 

02,Bl,16,AA,CB,Bl,16,20,B3,18, 

03ED 

1017 

DATA 

2B,0A,26,2B,0A,26,2B,B5,2A,3B, 

01 C8 

1098 

DATA 

90,EE,A5,16,A6,17,18,60,A0,00, 

040E 

1018 

DATA 

AD,12,12,E5,2A,85,28,AD,13,12, 

035F 

1099 

DATA 

Bl,16,AA,C8,B1,16,F0,04,86,16, 

0490 

1019 

DATA 

E5,2B,85,29,20,6F,18,38,A5,28, 

036A 

1100 

DATA 

85,17,60,20,5B,1B,AD,A7,19,85, 

0381 

1020 

DATA 

E5,1A,85,22,A5,29,E5,1B,85,23, 

041C 

1101 

DATA 

24,AD,A8,19,85,25,20,A7,18,70, 

038B 

1021 

DATA 

90,4B,20,B4,17,A5,2B,06,2A,2A, 

02 F0 

1102 

DATA 

1C,F0,1D,B0,05,20,80,18,90,F2, 

0418 

1022 

DATA 

06,2A,0A,AA,E8,86,26,E4,23,B0, 

042F 

1103 

DATA 

AD,AB,19,85,24,AD,AC,19,85,25, 

0436 

1023 

DATA 

38,A5,FA,05,FB,D0,0C,20,5B,18, 

0446 

1104 

DATA 

20,A7,1B,70,04,90,05,F0,03,A0, 

037B 

1024 

DATA 

Bl,20,85,FA,C8,Bl,20,B5,FB,20, 

0589 

1105 

DATA 

00,60,A0,06,60,20,5B,18,A5,FA, 

0398 

1025 

DATA 

15,17,F0,0C,10,21,20,E1,16,D0, 

0340 

1106 

DATA 

85,24,A5,FB,85,25,A9,00,AA,8E, 

04D4 

1026 

DATA 

1C,20,C4,15,D0,17,20,78,14,20, 

02C8 

1107 

DATA 

AD,19,BD,AE,19,20,A7,18,70,4D, 

03B6 

1027 

DATA 

07,19,BD,03,FF,20,0F,14,4C,2E, 

026C 

1108 

DATA 

F0,07,B0,49,20,80,18,90,EC,A5, 

04C9 

1028 

DATA 

13,20,4F,4F,4C,82,4F,A0,80,20, 

032E 

1109 

DATA 

FC,85,24,A5,FD,85,25,AD,A7,19, 

055E 

1029 

DATA 

07,19,8D,03,FF,5B,98,10,05,A2, 

0356 

1110 

DATA 

85,16,AD,A8,19,85,17,A0,03,A5, 

03ED 

1030 

DATA 

10,4C,3C,4D,B9,31,14,85,26,B9, 

0347 

1111 

DATA 

17,8D,AC,19,91,20,88,AS,16,8D, 

03EA 

1031 

DATA 

32,14,85,27,4C,84,4D,39,14,4F, 

02AB 

1112 

DATA 

AB,19,91,20,18,6D,A9,19,85,16, 

0357 

1032 

DATA 

14,64,14,53,54,41,52,54,20,4E, 

0288 

1113 

DATA 

AD,AA,19,65,17,85,17,B0,15,C9, 

0416 

1033 

DATA 

55,4D,42,45,52,20,4E,4F,54,20, 

02AC 

1114 

DATA 

FA,B0,11,20,80,18,20,A7,18,70, 

03C2 

1034 

DATA 

46,4F,55,4E,C4,4C,49,4E,45,20, 

0344 

1115 

DATA 

1F,90,D2,F0,D0,B0,06,A0,02,60, 

04F9 

1035 

DATA 

4E,55,4D,42,45,52,20,54,4F,4F, 

02DB 

1116 

DATA 

A0,04,60,AD,AB,19,85,24,AD,AC, 

0477 

1036 

DATA 

20,4C,41,52,47,C5,43,52,4F,53, 

0342 

1117 

DATA 

19,85,25,20,A7,18,70,04,90,IC, 

02C2 

1037 

DATA 

53,49,4E,47,20,4C,49,4E,45,20, 

0299 

1118 

DATA 

F0,1A,AD,AE,19,AE,AD,19,D0,03, 

04C5 

1038 

DATA 

4E,55,4D,42,45,D2,20,6F,18,20, 

0310 

1119 

DATA 

A8,F0,12,CD,AB,19,90,0D,D0,05, 

04AA 

1039 

DATA 

66,18,85,18,85,IC,85,2F,18,8A, 

0312 

1120 

DATA 

EC,A7,19,90,06,A0,CF,60,A0,D5, 

0586 

1040 

DATA 

85,19,65,26,B5,ID,85,30,20,1A, 

02BA 

1121 

DATA 

60,A0,00,60,20,66,1S,20,5B,18, 

0291 

1041 

DATA 

19,20,66,18,A0,00,B1,2F,91,16, 

02DE 

1122 

DATA 

84,2A,84,2B,A0,01,B1,16,D0,0A, 

039F 

1042 

DATA 

C8,B1,2F,91,16,D0,07,C8,91,16, 

0495 

1123 

DATA 

A9,FF,A0,04,91,20,88,10,FB,60, 

04F0 

1043 

DATA 

AB,91,16,60,C8,C8,B1,2F,88,AA, 

0551 

1124 

DATA 

A0,03,B1,16,AA,88,B1,16,A0,00, 

0403 

1044 

DATA 

Bl,2F,20,86,15,A0,02,91,16,G8, 

03AC 

1125 

DATA 

91,20,C8,48,BA,91,20,C8,6B,91, 

04BD 

1045 

DATA 

8A,91,16,C8,B1,2F,91,16,30,0B, 

03BB 

1126 

DATA 

20,C8,8A,91,20,20,80,18,A0,03, 

037E 

1046 

DATA 

D0,F7,C8,20,BF,18,20,9B,18,90, 

04B9 

1127 

DATA 

C8,B1,16,F0,1D,10,F9,20,14,18, 

03F1 

1047 

DATA 

C7,20,14,18,D0,E9,20,70,15,90, 

0401 

1128 

DATA 

D0,F4,C8,B1,16,F0,11,C9,20,F0, 

062D 

1048 

DATA 

E5,84,33,A2,00,95,18,E8,C8,Bi, 

054C 

1129 

DATA 

F7,20,79,15,90,E7,E6,2A,D0,E2, 

05DE 

1049 

DATA 

2F,20,79,15,B0,F5,84,34,CA,B5, 

04B9 

1130 

DATA 

E6,2B,D0,DE,20,D2,16,4C,BE,17, 

04E8 

1050 

DATA 

18,85,24,A0,00,84,25,F0,1A,B5, 

03C9 

1131 

DATA 

C9,89,90,14,F0,12,C9,D6,B0,0E, 

0555 

1051 

DATA 

18,85,27,CB,10,0F,18,A5,24,79, 

0305 

1132 

DATA 

C9,D5,B0,0A,C9,A7,B0,06,C9,8D, 

05D4 

1052 

DATA 

9D,19,85,24,A5,25,79,A2,19,85,-23E2 S 

113o ~ATA 

B0,02,C9,8A,60,20,0D,43,A2,FF, 

0476 

1053 

DATA 

25,C6,27,10,ED,CA,10,E3,20,8A, 

0476 

1134 

DATA 

E8,BD,00,@2,F0,22,C9,20,F0,F6, 

0588 

1054 

DATA 

15,B0,56,F0,54,85,24,86,25,A2, 

0455 

1135 

DATA 

C9,30,90,04,C9,3A,90,16,A2,FF, 

04D7 

1055 

DATA 

04,A9,30,85,27,38,B0,06,84,24, 

031F 

1136 

DATA 

E8,BD,00,02,D0,FA,BD,00,02,9D, 

04CD 

1056 

DATA 

85,25,E6,27,A5,24,FD,9D,19,A8, 

04DB 

1137 

DATA 

01,02, CA , 10,F7 , A9,3A, 8D, 00, 02, 

0346 

1057 

DATA 

A5,25,FD,A2,19,B0,ED,A5,27,95, 

0580 

1138 

DATA 

60,A0,00,A5,28,85,20,A5,29,85, 

03C5 

1058 

DATA 

18,CA,D0,DF,18,A5,24,69,30,85, 

0490 

1139 

DATA 

21,60,A5,2D,A6,2E,85,16,86,17, 

035F 

1059 

DATA 

18,AC,34,00,20,8F,18,A4,33,20, 

02B6 

1140 

DATA 

60,18,AD,10,12,AE,11,12,69,02, 

0283 

1060 

DATA 

9B,18,A2,04,B5,18,C9,30,D0,03, 

03F2 

1141 

DATA 

90,01,E8,85,1A,86,1B,60,18,48, 

0379 

1061 

DATA 

CA,D0,F7,A0,00,B5,18,91,16,C8, 

056D 

1142 

DATA 

A9,04,65,20,85,20,90,02,E6,21, 

0370 

1062 

DATA 

CA,10,F8,20,9B;iB,A0,00,2C,A4, 

0415 

1143 

DATA 

68,18,60,18,98,65,2F,85,2F,90, 

0368 

1063 

DATA 

33,4C,BC,14,CB,B1,2F,91,16,C9, 

0467 

1144 

DATA 

03,E6,30,18,60,18,98,65,16,85, 

0341 

1064 

DATA 

20,F0,F7,38,E9,30,90,07,C9,0A, 

04C2 

1145 

DATA 

16,90,03,E6,17,18,60,A0,00,Bl, 

036F 

1065 

DATA 

B0,02,38,60,18,60,85,24,86,25, 

0316 

1146 

DATA 

20,AA,C8,B1,20,C9,FB,B0,0C,C5, 

05A8 

1066 

DATA 

84,27,20,5B,18,A0,00,F0,05,C8, 

039B 

1147 

DATA 

25,90,06,F0,02,B0,02,E4,24,B8, 

041F 

1067 

DATA 

D0,02,E6,21,B1,20,AA,C8,B1,20, 

04ED 

1148 

DATA 

60,2C,94,19,60,CB,20,Dl,18,C9, 

0433 

1068 

DATA 

C9,FA,B0,1A,C8,C8,E4,24,D0,EB, 

06E0 

1149 

DATA 

20,F0,F8,60, A0,00,'2C, A0,01,8D, 

0462 

1069 

DATA 

C5,25,D0,E7,Bl,20,AA,8B,B1,20, 

0575 

1150 

DATA 

01,FF,B1,3D,8D,03,FF,60,18,98, 

048D 

1070 

DATA 

A4,27,C5,24,D0,02,E4,25,18,60, 

0407 

1151 

DATA 

65,3D,85,3D,90,02,E6,3E,60,A0, 

041A 

1071 

DATA 

A5,24,A6,25,A4,27,38,60,A5,FA, 

0496 

1152 

DATA 

01,2C,A0,FF,20,C3,1B,C9,00,F0, 

0480 

1072 

DATA 

85,24,A5,FB,B5,25,20,B5,16,85, 

0463 

1153 

DATA 

13,C9,3A,F0,0F,C9,2C,D0,01,C8, 

04A3 

1073 

DATA 

2F,86,30,A6,FC,A4,FD,EB,D0,01, 

05E1 

1154 

DATA 

20,DA,18,20,D7,77,20,15,88,18, 

0355 

1074 

DATA 

CB,86,24,84,25,20,B5,16,85,31, 

03BC 

1155 

DATA 

60,18,24,38,A2,20,B5,18,90,05, 

02FB 

1075 

DATA 

86,32,38,E5,2F,85,35,8A,E5,30, 

045D 

1156 

DATA 

BD,AF,19,95,18,9D,AF,19,CA,10, 

0471 

1076 

DATA 

85,36,38,A5,22,E5,35,A5,23,E5, 

0481 

1157 

DATA 

Fl,60,38,A5,1A,E5,18,AB,A5,1B, 

04AD 

1077 

DATA 

36,B0,03,A0,04,60,AD,A7,19,85, 

03DF 

1158 

DATA 

E5,19,48,38,A5,18,E5,1C,AA,A5, 

048B 

1078 

DATA 

24,AD,A8,19,85,25,20,B5,16,85, 

03AC 

1159 

DATA 

19,E5,1D,D0,05,8A,D0,02,68,60, 

0414 

1079 

DATA 

33,86,34,85,1B,86,19,18,65,35, 

02DB 

1160 

DATA 

68,90,31,AA,EB,84,1A,38,A9,00, 

043A 

1080 

DATA 

85,1C,8A,65,36,85,1D,20,6F,18, 

030F 

1161 

DATA 

E5,1A,A8,84,1A,38,A5,18,E5,1A, 

0439 

1081 

DATA 

18,65,35,85,37,8A,65,36,85,38, 

0350 

1162 

DATA 

85,18,B0,02,C6,19,3B,A5,1C,E5, 

04 0C 

1082 

DATA 

20,1A,19,38,A5,2F,E5,33,A5,30, 

034C 

1163 

DATA 

1A,85,1C,B0,02,C6,ID,Bl,18,91, 

03AA 

1083 

DATA 

E5,34,90,1A,1B,A5,2F,65,35,85, 

03CE 

1164 

DATA 

1C,C8,D0,F9,E6,19,E6,1D,CA,D0, 

0649 

1084 

DATA 

2F,A5,30,65,36,85,30,18,A5,31 , 

0342 

1165 

DATA 

F2,60,84,18,AA,E8,18,65,1D,85, 

049F 

1085 

DATA 

65,35,85,31,A5,32,65,36,85,32, 

0379 

1166 

DATA 

1D,38,A5,1A,E5,18,85,1A,B0,02, 

0362 

1086 

DATA 

A2,05,B5,2F,95,1B,CA,10,F9,20, 

042B 

1167 

DATA 

C6,1B,98,F0,07,B1,1A,91,IC,88, 

0470 

1087 

DATA 

1A,19,A5,31,85,18,A5,32,85,19, 

031B 

1168 

DATA 

D0,F9,B1,1A,91,1C,C6,1B,C6,1D, 

0505 

1088 

DATA 

A5,37,85,1A,A5,38,85,18,AS,2F, 

03CC 

1169 

DATA 

CA,D0,F2,60,40,64,00,0A,00,00, 

039A 

1089 

DATA 

B5,lC,A5,30,B5,iD,20,lA,l“,20, 

028B 

1170 

DATA 

00,00,00,01,0A,64,E8,10,00,00, 

0167 

1090 

DATA 

66,18,A9,00,B5,2A,g5,2B,A0,01, 

0327 

1171 

DATA 

00,03,27,00,00,00,00,00,00,00, 

802A 

1091 

1092 

DATA 

DATA 

B1,16,F0,2B,E6,2A,D0,02,E6,2B, 
A0,03,C8,B1,16,D0,F0,C8,18,98, 

04D2 

0575 

Listing 9. Ein RENUMBER-Befehl, der auch 


1093 

DATA 

65,16,A6,17,90,01,E8,A0,00,91, 

03E2 

Programmbereiche verschiebt (Schluß) 
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Bedienungshinweise 

Wir gehen ab jetzt immer vom folgenden Fall aus: Sie haben 
ein Basic-Programm im Speicher stehen, das zehn Zeilen 
umfaßt, das in Hunderterschritten, beginnend bei 50, nume¬ 
riert ist. Geben Sie nun einfach RENUMBER ein. Das Pro¬ 
gramm wurde in Zehnerschritten, beginnend bei Zeile 100, 
numeriert. Wenn auf den RENUMBER-Befehl keine weiteren 
Angaben folgen, wählt das Programm die voreingestellten 
Werte »100,10« (Start-Zeilennummer, Schrittweite). 

Haben Sie das gedachte Programm zuvor in Zehnerschrit¬ 
ten bearbeitet, geben Sie nun einmal RENUMBER 500,1,150 
ein. Hier werden die Zeilennummern ab 150 neu in Einer¬ 
schritten numeriert. Die ehemaligen Programmzeilen, die ab 
Zeile 150 in Zehnerschritten numeriert bestanden, beginnen 
nun bei Zeile 500 in Einerabständen. 

Mit dem folgendem Befehl RENUMBER 1,1,160,190 pas¬ 
siertfolgendes: Da die Zeilen 160 bis 190 am Programmende 
sehr deplaziert dastehen würden, findet man sie in Einer¬ 
schritten numeriert am Programmanfang wieder. Somit las¬ 
sen sich also beliebige Programmblöcke verschieben. Die 
komplette Syntax ist also RENUMBER <Startadr. neu>, 
< Schrittweite >, < (Startadralt >, < Endadresse alt >. 

(Heino Velder/dm) 

Register* und Speicherbereich-Retter 


Einige werden bestimmt schon gelegentlich versucht haben, 
an den Speicherinhalt von Programmen zu kommen, um zum 
Beispiel eine Hardcopy eines Grafikbildschirms zu machen. 

Das Programm (Listing 10) tippen Sie bitte ab und spei¬ 
chern es. Nach dem Start mit RUN wird ein ablauffähiges 
Maschinenprogramm auf Diskette geschrieben. Dieses 
Machinenprogramm können Sie nun immer mit 
BLOAD"MEMORY-RETTER" 64CH 

laden und durch SYS 4864 starten. Der CI28 meldet sich 
nun im C64-Modus, der einen ganz normalen Eindruck 
macht. Es scheint aber nur so, denn der C64-Modus wurde 
in RAM-BANK 1 (Variablen-BANK) gestartet Außerdem wur¬ 
den noch einige Kopier-Routinen installiert. Nun kann man 
das Programm, das man analysieren möchte, laden und star¬ 
ten. Sobald man nun den Reset-Knopf drückt, treten die 
Kopier-Routinen in der anderen RAM-BANK (BANK 0) in 
Aktion. Der komplette Ein-/Ausgabebereich wird nach 
SD000 bis SDFFF in BANK 0 kopiert. Außerdem überträgt 
das Programm Page 2 und 3 ($200 bis $3FF) nach $2200 
bis $23FF in BANK 0. Der restliche Speicher des 
C64-Modus bleibt bis auf die obersten 256 Byte unverän¬ 
dert in BANK 1. 

Nun kann man in aller Ruhe die VIC-Register untersuchen 
und feststellen, in welchem Bereich sich der Bildschirm oder 
die Sprites befanden. 

Funktionsweise 

In BANK 1 gibt es bei $FFF5 3 Byte, die den Code »CBM« 
enthalten. Bei einem Reset prüft das Betriebssystem diese 
Bytes. Stimmt der Code, so wird der Inhalt der Bytes $FFF8 
bis $FFF9 als Sprungadresse in BANK 0 genommen. Das 
Startprogramm verbiegt nun diesen Vektor auf die Kopier- 
Routine. Danach schaltet es RAM-BANK 1 und den C64- 
Modus ein. Außerdem wird auch der VIC auf diese BANK 
gelegt, da sonst der Bildschirm dunkel bliebe. 

Da sich der C64-Modus nun in BANK 1 befindet, könnte 
ein Programm den »CBM«-Code bei $FFF5 zerstören. Um 
dies zu verhindern, wird der gemeinsame Bereich (Common 
Aera) der BANKs zum Speicherende nach $FC00 bis $FFFF 
geschoben. Greift ein C 64-Programm auf diesen Bereich zu, 
so wird immer BANK 0 adressiert, der »CBM«-Code ist 
sicher. Allerdings greift der VIC weiterhin auf BANK 1 zu, so 
daß es bei Programmen, die zum Beispiel den Grafikbild¬ 
schirm nach $E000 bis $FFFF legen, zu Wirrwar im unteren 


Bildschirmbereich kommt. Dies ist jedoch harmlos, da die 
Grafik trotzdem intern korrekt aufgebaut wird. Nach einem 
Reset sitzt alles wieder an der richtigen Stelle. 

(Ulrich Textoris/dm) 

Zeichensatz kopieren 


Das Programm »Schnellkopierer« (Listing 11) kopiert den 
gesammten Zeichensatz ($D000 bis $E000) in einen ange¬ 
gebenen Bereich. Im Byte 53272 geben die Bits 1 bis 3 den 
Platz des Zeichensatzes an. Daraus ergeben sich acht mögli¬ 
che Adressen, ab denen der Zeichensatz im Speicher liegen 
kann: 

0, 2048, 4096, 6144, 8192, 10240, 12288, 14336 

Dabei bildet der erste Fall eine Ausnahme, da sich dort die 
Zeropage befindet. Im Einschaltzustand liegt der Zeichen¬ 
satz ab 4096 ($1000). 

Das eigentlich interessante am Programm ist, daß das 
Maschinenprogramm (ohne SYS-Aufruf) den Zeichensatz in 
0,07 Sekunden an die angegebene Stelle kopiert. Ein Basic- 
Programm würde lOOOmal mehr Zeit benötigen (70 Sekun¬ 
den). Abschließend muß der Basic-Bereich noch vor dem 
Überschreiben geschützt werden. (Thorsten Schüngel/dm) 


10 FOR A=1 TO 384: READ B: C=C+B: NEXT 
20 IF ABS(C-46629)>lE-4 THEN PRINT "PRUEFSUM 
MENFEHLERSTOP 
30 OPEN 2,8,1,"0:MEMORY-RETTER" 

40 PRINT#2,CHR*(0>;CHR*<19);: REM STARTADRES 
SE 

50 RESTORE 

60 FOR A=1 TO 384: READ B: PRINT#2,CHR*(B);: 
NEXT 

0 CLOSE 2: PRINT "LADER IST FERTIG" 

0 END 

32000 DATA 120,169,0,141,0,255,169,0,133,252 
,169,253,133,253,169,252,141,185,2 

32001 DATA 160,0,162,1,185,176,19,32,119,255 
,32,119,255,200,20B,242,169,255,133 

32002 DATA 253,162,1,160,248,169,0,32,119,25 

5.162.1.200.169.20.32.119.255.234 

32003 DATA 234,234,169,1,141,33,208,169,96,1 

33.252.169.19.133.253.169.252.141 

32004 DATA 185,2,160,0,162,1,185,96,19,32,11 

9.255.200.208.245.234.234.234.234 

32005 DATA 234,234,120,169,227,133,1,169,47, 
133,0,169,64,141,0,255,169,72,141 

32006 DATA 6,213,169,240,141,8,213,169,0,141 
,7,213,169,247,141,5,213,234,234,234 

32007 DATA 108,252,255,0,255,162,0,160,0,140 
,6,213,181,0,72,189,0,1,72,189,0,2 

32008 DATA 72,189,0,3,160,7,140,6,213,234,15 
7,0,35,104,157,0,34,104,157,0,33,169 

32009 DATA 0,141,245,255,169,126,141,0,255,1 
62,0,160,0,140,6,213,181,0,72,189 

32010 DATA 0,1,72,189,0,2,72,189,0,3,160,7,1 
40,6,213,234,157,0,35,104,157,0,34 

32011 DATA 104,157,0,33,104,157,0,32,232,208 
,213,160,4,140,6,213,96,0,0,0,0,0 

32012 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,169,0 
,141,1,213,169,63,141,2,213,162,16 

32013 DATA 169,0,133,252,169,208,133,253,160 
,0,141,1,255,177,252,141,2,255,145 

32014 DATA 252,200,208,243,230,253,202,208,2 
38,141,1,255,234,169,0,133,4,169,253 

32015 DATA 133,3,8,104,133,5,169,1,133,2,32, 

110.255.169.7.141.6.213.169.127.141 

32016 DATA 3,213,162,0,141,2,255,189,0,252,1 
41,3,255,157,0,252,141,2,255,189,0 

32017 DATA 253,141,3,255,157,0,253,141,2,255 
,189,0,254,141,3,255,157,0,254,141 

32018 DATA 2,255,232,208,214,169,4,141,5,213 
,108,252,255,0,0,0 

Listing 10. »Memory-Retter« 


SONDERHEFT 10 


155 










TIPS&TRICKS 


C 128 


10 DATA 165,147,74,74,133,148,169,0,133,14t, 
173,14,220,41,254,141,14,220 
20 DATA 165,1,41,251,133,1,169,0,133,20,169, 
208,133,21,160,0,177,20,145,146 
30 DATA 200,208,249,230,21,230,147,165,21,20 
1,224,208,239,165,1,9,4,133,1 
40 DATA 173,14,220,9,1,141,14,220,173,24,208 
,41,240,5,148,141,24,208,96 
50 FOR T=49152 TO 49227s READ A: POKE T,A: N 
EXT 

60 INPUT "ADRESSE :";B: B=INT(B/256) 

70 POKE 147,B 
80 SYS 49152 

90 PRINT : PRINT "BASIC-BEREICH MUSS NOCH": 

PRINT "GESCHUETZT WERDEN !!!": END 
100 REM ***************************** 

110 REM **** MOEGLICHER BEREICH: **** 

120 REM **** **** 

130 REM **** <0),2048,4096,6144, **** 

140 REM **** 8192,10240, **** 

150 REM **** 12288,14336 **** 

160 REM ****************************** 

Listing 11. Kopiert den Zeichensatz in nur 0,07 Sekunden 
an eine andere Stelle 


10 GRAPHIC 1,1: GRAPHIC 0 

20 FOR A=64128 TO 64216: BANK 15: B=PEEK(A): 

BANK 0: POKE 16295+A-64128,B: NEXT 
30 POKE 832,16295-1NT(16295/256)*256 
40 POKE 833,INT(16295/256) 

50 POKE 16294+74,69: POKE 16294+75,70 
60 KEY 1,"A": KEY 3,"B": KEY 5,"C": KEY 7,"D 

Listing 12. Umfunktionierung des Zehnerblocks zu einer 
Hex-Tastatur 

— 

Zehnerblock als Hex-Tastatur 


Mit diesem Programm (Listing 12) läßt sich eine Hex-Tastatur 
auf dem Zehnerblock simulieren. Dies ist vor allem bei der 
Eingabe von Hex-Dumps von Vorteil. 

Nach dem Starten mit RUN kopiert das Programm die 
Tastenbelegung der Normaltastatur in den Bereich, der nor¬ 
malerweise von der Grafik benutzt wird. Der Schutz vor Über¬ 
schreiben durch ein Basic-Programm erfolgt durch GRA¬ 
PHIC 1,1 (Reservieren des Grafikspeichers). Dann wird in 
den Zeilen 30 und 40 der Zeiger, der auf die Tastaturtabelle 
der geSHIFTeten Tastatur deutet, auf die entsprechenden 
Werte der neuen Tabelle gelenkt. Zeile 50 weist den Tasten 
74 und 75 (+ und -) einen neuen ASCII-Code zu. Abschlie¬ 
ßend erfolgt die Neudefinition der Funktionstasten. 
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Bild 1. Die geSHIFTete Hex-Belegung des Zehnerblocks 


Um mit der neuen Tastaturbelegung arbeiten zu können, 
muß <SHIFT> oder <SHIFT/LOCK> gedrückt bezie¬ 
hungsweise eingerastet sein. 

Benötigen Sie den Grafikbildschirm, dann können Sie die 
Zahl 16259 (Anfangsadresse der Tabelle) im ganzen Pro¬ 
gramm durch die Adresse ersetzen, die Ihnen am geeignet¬ 
sten erscheint. Bild 1 zeigt Ihnen die neue Belegung des 
geSHIFTeten Zehnerblocks. (Christian Maul/dm) 

Sichere Input-Routine 


Die herkömmliche INPUT-Routine des C128 steht in keinem 
Verhältnis zu seinen anderen Fähigkeiten. Diese Routine 
(Listing 13) behebt diese Mängel. Nun kann nicht mehr eine 
Eingabemaske zerstört werden, indem man mit dem Cursor 
aus der Zeile fährt. 

Die Eingabe-Routine wird durch 
PA$="S1Z1S2Z2MINSCG0SUB 200 

aufgerufen. Dabei besitzen die zu übergebenden Parameter 
folgende Bedeutung: \ 

51 (2 Zeichen) - Spaltennummer der linken oberen 
Ecke des Eingabefensters 

ZI (2 Zeichen) - Zeilennummer der linken oberen 
Ecke des Eingabefensters 

52 (2 Zeichen) - Spaltennummer der rechten unteren 
Ecke des Eingabefensters 

Z2 (2 Zeichen) - Zeilennummer der rechten unteren 
Ecke des Eingabefensters 
MIN (3 Zeichen) - minimale Eingabelänge 
S (l Zeichen) - Wert = 1: Leerzeichen nicht erlaubt 
Wert = 0: Leerzeichen ist erlaubt 
C (1 Zeichen) - Codenummer für zulässige Zeichen 

Wert = 1: nur Groß-/Kleinbuchstaben 
und Leerzeichen 

Wert = 2: Groß-/Kleinbuchstaben, 
Zahlen, Leerzeichen, Bindestrich 
und Punkt 

Wert = 3= Groß-/Kleinbuchstaben, 
Zahlen und SPACE 

Wert = 4: Zahlen, Bindestrich und 
Schrägstrich 

Wert = 5: Zahlen, Punkt und 
Apostroph 

Zum Anfügen eines weiteren Codes ist folgendes zu tun: 
In Zeile 320 hinter dem Befehl »ON C GOSUB 
350,360,370,380,390« ist »,400« anzufügen. Danach ist in 
Zeile 400 eine Bedingung ähnlich der in den Zeilen 350 bis 
390 einzugeben. 

Selbstverständlich können auch die bereits vorhandenen 
Codes verändert werden. 

Nach dem Aufruf steht die Eingabe dann in der Variable 
»INS«, wobei Leerzeichen am Ende der Eingabe nicht abge¬ 
schnitten werden. (Alexander Niepel/dm) 

Komfortabler DATAwandler 


Der sonst recht ordentliche Monitor des CI28 läßt einen 
Befehl zum Umwandeln von Speicherbereichen in Basic- 
DATA-Zeilen vermissen. Die folgende Routine (Listing 14) 
behebt dieses Manko. 

Das Programm muß unbedingt vor dem ersten Start gespei¬ 
chert werden, da es sich anschließend selbst zerstört. 

Das Programm ist durch 
RUN"DATAWANDLER" 

zu laden und zu starten. Nach kurzer Wartezeit erscheint das 
Hauptmenü, in dem folgende Angaben erwartet werden: 

- Adressen hexadezimal oder dezimal angeben ? 
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C 128 


TIPS&TR1CKS 


1@0 FAST : PRINT CHR*(14) CHR*(147) CHR*(5); 

110 PRINT "ÜAME{10SPACE> (1-30 REICHEN, A-Z.) (9SPACE 
>: " : 

PA*="4400730000101" : GOSUB 200 : NA*=IN* 

120 PRINT "STRASSEC7SPACEJ <1—30 SEICHEN, A-S 0-9 . 
-) : " : 

PAS="4401730100102" : GOSUB 200 : ST*=IN* 

130 CHAR ,0,2, "tiJDHNQRT <7SPACE> (1—30 SEICHEN, A-S 0 
-9)<5SPACE>s" s 

PA*="4402730200103" : GDSUB 200 : WO*=IN* 

140 CHAR ,0,3,"TELEFONNUMMER (1-20 SEICHEN, 0-9 - 
/)<5SPACE>r" s 

PA*="4403630300114" : GOSUB 200 : TE*=IN* 

150 CHAR ,0,4,"SEBURTSDATUM<2SPACE>(6-10 SEICHEN, 
0-9 . •)C5SPACE>:" : 

PA*="4404530400615" ! GOSUB 200 : GE*=IN* 

160 CHAR ,0,5,"SEBURTS0RT<4SPACE>(1-20 SEICHEN, A- 
S)I9SPACE}i" s 

PA*="4405630500101" : GOSUB 200 : GT*=IN* 

170 CHAR ,0,8,"IHRE SÄTEN:(2SPACE} " -t-NA* : CHAR ,13 
,9,ST* : CHAR ,13,10,WO* : 

CHAR ,13,11,"3EL.:"+TE* : CHAR , 13,12,"SEB. : A 
M "+GE* : CHAR ,19,13, 

"IN "+GT*+AN* 

180 END 

190 REM **************************** " IN PUT— ROI IT TN 
E" *************************** 

200 FAST : E*=CHR*(27): S1=VAL(LEFT*(PA*,2)): Z1=V 
AL(MID*(PA*,3,2)>: 

S2=VAL(MID*(PA*,5,2>): Z2=VAL(MID*(PA*,7,2)>: 
MI=VAL(MID*(PA*,9,3>>: 

CD=VAL(RIGHT*(PA*,1)>: AU=32 
210 SP=VAL(MID*(PA*,12,1)): WINDOW S1,Z1,S2,Z2: PR 
INT CHR*(28)E*"M"UE* CHR*(19);: 
MA=(S2-S1+1)*(Z2-Z1+1>: IN*=UE*: PO=l: UE*="": 

AU*=E*+"U": ANS=E*+"F"+E*+"U": 

CU=2603 

220 PRINT AN*;: GET KEY Nt: N=ASC(N*>: POKE CU,AU: 
L=LEN(IN*) 

230 IF N=13 THEN BEGIN : IF EI=@ AND L>=MI THEN PR 
INT E*E*E*"L" CHR*(5) CHR*(19) CHR*(19) 

AU*: POKE CU,AU: RETURN : ELSE 220: BEND 
240 IF N=19 THEN BEGIN : IF POOl AND EI=0 THEN 
PRINT E*E*N*;: PO=l: GOTO 220: ELSE 220: BEND 
250 IF N=147 THEN EI=0: PO=l: IN*='"': PRINT E*E*N* 
;: GOTO 220 

260 IF N=29 THEN BEGIN : IF EI=0 AND PO<=L AND PO< 
MA THEN PO=PO+l: PRINT E*E*N*;: GOTO 220: 

ELSE 220: BEND 

270 IF N=157 THEN BEGIN : IF EI=0 AND POM THEN PO 
=PO—1: PRINT E*E*N*;: GOTO 220: 

ELSE 220: BEND 

2B0 IF N=17 THEN BEGIN : IF EI=0 AND P0+S2-S1+1<=M 
A AND P0+S2-S1 + KL+2 THEN PO=PO 
+S2-S1+1: PRINT E*E*N*;: GOTO 220: ELSE 220: B 
END 

290 IF N=20 THEN BEGIN : IF POM THEN IN*=LEFT*(IN 
*,PO—2> +RIGHT*(IN*,L—PO+1): L=L-1: 

PO=PO—1: PRINT E*E*N*;: GOTO 220: ELSE 220: BE 
ND 

300 IF N=145 THEN BEGIN : IF EI=0 AND PO-S2+S1-1>0 
THEN P0=P0-S2+S1-1: PRINT E*E*N*;: 

GOTO 220: ELSE 220: BEND 

310 IF N=148 THEN BEGIN : IF L<MA AND PO<=L THEN L 
=L+1: IN*=LEFT*(IN*,PO-l)+" "+RIGHT* 

(IN*,L-PO): EI=EI+SP: PRINT E*E*N*j: GOTO 220: 
ELSE 220: BEND 

320 ON CO GOSUB 350,360,370,380,390: IF FL-1 THEN 
FL=0: GOTO 220 

330 PRINT E*E*N*-, : IF PO=L+l THEN IN*=IN*+N*: L=L+ 
1: ELSE MID*(IN*,PO,1)=N* 

340 PO=PO+l + (PO=MA): EI=EI-1-(EI=@>: GOTO 220 
350 FL=1: IF((N>64 AND N<91) 0R(N>192 AND N<219) 0 
R N=32> AND PO<=MA THEN FL=0: 

RETURN : ELSE RETURN 

360 FL=1: IF((N>47 AND N<58) 0R(N>64 AND N<91> OR( 
N>192 AND N<219) OR N=45 OR N=32 OR N=46> 

AND PO<=MA THEN FL=0: RETURN : ELSE RETURN 
370 FL=1: IF((N>47 AND N<58> 0R(N>64 AND N<91) OR( 
NM92 AND N<219> OR N=32> AND PO<=MA THEN 
FL=0: RETURN : ELSE RETURN 
380 FL=1: IF((N>46 AND N<58) OR N=45) AND PO<=MA T 
HEN FL=0: RETURN : ELSE RETURN 
390 FL=1: IF((N>47 AND N<58) OR N=46 OR N=39) AND 
PO< =MA THEN FL=0: RETURN : ELSE RETURN 


Listing 13. Verbesserung des INPUT-Befehls 


Als Antwort drücken Sie entweder die Taste <H> für 
hexadezimal oder < D > für dezimal. 

- Start- und Endadresse: 

Hier wird die tatsächliche Start- und Endadresse eingege¬ 
ben. Das Programm berücksichtigt, ob die Eingaben hexade¬ 
zimal (vier mögliche Zeichen) oder dezimal (fünf mögliche 
Zeichen) erfolgen sollen. 

- Erste Zeilennummer: 

Es muß die allererste Zeilennummer des zu erzeugenden 
Programms angegeben werden. Sie muß größer oder gleich 
300 sein, da der Teil des DATA-Wandlers, der sich während 
der Umwandlung noch im Speicher befindet, alle Zeilennum¬ 
mern bis 290 belegt. 

Die Eingabe kann mit < RETURN > abgebrochen werden. 
Die Eingabe erfolgt auf jeden Fall dezimal. 

- Schrittweite: 

Die Schrittweite bestimmt den Abstand zwischen den ein¬ 
zelnen Zeilennummern. Sie muß größer Null und Weiner 99 
sein. Wird eine Null eingegeben oder nur < RETURN > 
gedrückt, nimmt das Programm als Schrittweite den Wert 1 
an. Auch hier erfolgt die Eingabe auf jeden Fa(l dezimal, 

- DATAs hexadezimal oder dezimal ausgeben? 

Hier genügt als Antwort <H> oder <D>. Es |ist jedoch zu 
bedenken, daß hexadezimale Zahlen weniger Speicherplatz 
benötigen (pro auszulesende Speicherstelle ein Byte weni¬ 
ger). Das ist durch die Schreibweise bedingt. Bei der dezima¬ 
len Ausgabe werden alle Werte der besseren Übersicht 
wegen als dreistellige Zahlen ausgegeben. Durch Löschen 
der Befehlskette 
T$=RIGHT$("000"+T$,3) 


10 SCNCLR : PRINT "{2H0ME>": WINDOW 0,0,39,2 
4.1 

20 EC ,UB 300 

30 REM “ *****T2SPACE>EINLESEN UND SCHREIBEN 
DER DATAS{2SPACE>***** 

40 FAST : IF SW=0 THEN SW=1: BANK SB 
50 IF AF*="H" THEN RE*="R*": HE*="DEC(R*) 
SY*="DEC("+CHR*(34)+HEX*(B)+CHR* 

<34)+")": ELSE RE*="R": HE*="R": SY*=STR* 
(B) 

60 PRINT "tCLR> DELETE 290-": PRINT : PRINT 
: PRINT "GOTO 70": GOTO 220 
70 Z1S=STR*(Z>+" FAST:BANK"+STR$(SB): PRINT 
“<CLR>"Z1S 

80 Z=Z+S: Z2$=STR*(Z)+" FORA="+STR*(B)+"TO“+ 
STR*(E)+“:READ"+RE*+": 

POKE A,"+HES+": NEXT ":PRINTZ2* 

90 Z=Z+S: Z3*=STR*(Z>+" SLOW: SYS "+SY*: PRI 
NT Z3*: Z=Z+S: PRINT "GOTO 110" 

100 GOTO 210 
110 BZ=0 
120 SCNCLR : 

130 PRINT Z;"DATA"; 

140 IF AF*="D" THEN 150: ELSE 160 
150 FOR D=B TO B+7: T=PEEK(D): T*=STR*(T>: T 
*=RIGHT*(T*,LEN(T*)-1): T*=RIGHT* 
("000"+T*,3>: PRINT T*;",";: NEXT : GOTO 
170 

160 FOR J=B TO B+7: T*=RIGHT*(HEX*(PEEK<J)), 
2): PRINT T*J: NEXT 
170 PRINT CHR*(20) 

180 Z=Z+S: B=B+B: BZ=BZ+1 
190 IF BZ<7 AND B< E+l THEN GOTO 130 
200 IF B < E+l THEN PRINT "GOTO 110": ELSE S 
LOW : PRINT "DELETE -280" 

210 PRINT : PRINT 
220 POKE 842,19 
230 FOR TP=B43 TO 843+9 
240 POKE TP,13 
250 NEXT 
260 POKE 208,10 
270 END 
280 SLOW 


Listing 14. 

Ein komfortabler DATA-Wandler 
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C 128 


290 REM "{2SPACE>*****<3SPACE>AUFBAU DES MEN 
ÜE'S{2SPACE}***** 

300 FAST : SCNCLR : COLOR 0,1 ; COLOR 4,1: 
310 PRINT "{BREYl,RVS0N>ß<3BSPACE>ü {GREY3,R 
VOFF}"; 

315 PRINT 


aaaai<RvsoN,GREYi> ” 

320 FDR L=1 TO 20 

330 PRINT "<BREYl,RVSON> {RV0FF,GREY3}£{36SP 
ACE>ü<BREYl,RVSON> " 

340 NEXT : 

350 PRINT "<GREYl,RVSON> <RVOFF,GREY3>iE££££ 
LLFFfffFFffffFfßffFFTffFfFrrrrr k < roson , g 
REY1J "; 

355 PRINT "a<38SPACE>fl" 

360 PRINT "{HOME,WHITE,3D0WN,3RIGHT>1) ADRES 
SEN HEXADEZIMAL ODER{15RIGHT> 

DEZIMAL EINGEBEN (H/D) 

370 PRINT "{DOWN,3RIGHT}2> STARTADRESSE{7SPA 
CE >: " 

3B0 PRINT "{DOWN,3RIGHT}3> ENDADRESSE<9SPACE 
>: " 

390 PRINT "{D0WN,3RIGHT}4) ERSTE ZEILENNUMME 
R: " 


400 PRINT "{DOWN,3RIGHT>5> SCHRITTWEITE{7SPA 
CEJ: M 

410 PRINT " {DOWN,3RIGHT>6) DATAS HEXADEZIMAL 
ODER{18RIGHT> 

DEZIMAL AUSGEBEN (H/D) " 

420 PRINT "(DOWN,3RIGHT>7) SPEICHERBANK (0-1 
5) : ” 

430 SLOW : PRINT : PRINT : PRINT 
440 REM "C2SPACE>*****C3SPACEJMENUE ABFRAGE{ 
2SPACE>***** 

450 TRAP 1130: FOR C=1 TO 7: PRINT "{WHITE,U 
P.3RIGHTJMEINE ANTWORT AUFC8SPACE,8LEFT> 
";C;"{RED}" 

460 ON C GOSUB 510,600,700,800,900,1000,1100 
470 NEXT 

480 PRINT "(WHITE,UP,3RIGHT>EINGABEN OKAY ?< 
2SPACEXJ/N) GET KEY ES: IF ESO"J" AN 
D ESO“N" 

THEN 480: ELSE IF ES="J" THEN GOTO 490: 
ELSE 300 

490 PRINT "{HOME,21DOWN}": FDR A=1 TO 19: 

PRINT "{2UP,3RIGHT,34SPACE,3RIGHT}";: NE 
XT : 

WINDOW 2,2,37,21: GOTO 40 
500 REM "{2SPACE}*****{2SPACE>ADRESSEN HEX. 

ODER DEZ. EINGEBEN ?{2SPACE}***** 

510 POKE 55485,2: GET KEY AIS: IF AlSO"H" A 
ND AlSO"D" THEN 510: ELSE HDS=A1S: 

IF HDS="H" THEN POKE 1213,8: RETURN : EL 
SE POKE 1213,4: RETURN 
520 : 

530 : 

540 : 

550 : 

560 : 

570 : 

580 : 

590 REM "{2SPACE}*****{3SPACE>STARTADRESSE{3 
SPACE}***** 

600 STS="": IF HDS="H" THEN G=4: ELSE G=5 
610 PRINT "{UP}" TAB(23): FOR K=1 TO G: GET 
KEY MS(K): STS=STS+MS(K>: PRINT ; 

MS(K);: NEXT : IF HDS="H" THEN 620: ELSE 
630 

620 B=DEC(STS): PRINT "{HOME,6D0WN}";TAB(26> 

;"S" HEXS(B); B: 

FOR V=1 TO 14: PRINT : NEXT : RETURN 
630 B=VAL(STS): PRINT "{HOME,6DOWN}";TAB(26) 

;"S" HEXS(B);B: 

FOR V=1 TO 14: PRINT : NEXT : RETURN 
640 : 

650 : 

660 : 

670 : 

680 : 

690 REM "{2SPACE}*****{3SPACE}ENDADRESSE{3SP 
ACE}***** 


700 STS="": IF HDS="H" THEN G=4: ELSE G=5 
710 PRINT "{UP}" TAB(23): FOR K=1 TO G: GET 
KEY MS(K): STS=STS+MS(K>: PRINT ; 

MS(K);: NEXT : IF HDS="H" THEN 720: ELSE 
730 

720 E=DEC(STS): PRINT "{H0ME,BD0WN}";TAB(26) 
;"S" HEXS(E);E: FOR V=1 TO 12: 

PRINT : NEXT : RETURN 

730 E=VAL(STS): PRINT ”{H0ME,8D0WN}";TAB(26) 
;"S" HEXS(E);E: FOR V=1 TO 12: 

PRINT : NEXT : RETURN 
740 : 

750 : 

760 : 

770 : 

780 : 

790 REM "{2SPACE}*****{4SPACEIERSTE ZEILENNU 
MMER{4SPACE}***** 

800 ZES="": PRINT "{UP}" TAB(23)"{5SPACE,5LE 
FT}";: FOR K=1 TO 5: GET KEY ZS: IF ZS=C 
HRS(13) 

THEN 810: ELSE ZES=ZES+ZS: PRINT ;ZS;: N 
EXT 

Bl 0 Z=VAL(ZES): IF Z<30 THEN PRINT : GOTO 80 
0: ELSE PRINT "{HOME,10DOWN}" TAB(26)Z: 
FOR V=1 TD 10: PRINT : NEXT : RETURN 
820 : 

830 : 

840 : 

850 : 

860 : 

870 : 

880 : 

890 REM ***** SCHRITTWEITE ***** 

900 SWS=““: PRINT "{UP}" TAB(23)“{5SPACE,5LE 
FT}";: FOR K=1 TD 2: GET KEY SS: IF SS=C 
HRS(13) 

THEN 910: ELSE SWS=SWS+SS: PRINT SS;: NE 
XT 

910 .*■. =VAL (SWS) : PRINT " {HOME, 12D0WN}" TAB(26 
)S: FOR V=1 TO 8: PRINT : NEXT : RETURN 
920 : 

930 : 

940 : 

950 : 

960 : 

970 : 

9B0 : 

990 REM "{2SPACE}*****{2SPACE}DATAS HEX. ODE 
R DEZ. AUSGEBEN{2SPACE}***** 

1000 POKE 55925,2: BET KEY AIS: IF AlSO"H" 
AND AlSO"D" THEN 1000: ELSE AFS=A1S: 

IF AFS="H" THEN POKE 1653,8: RETURN : E 
LSE POKE 1653,4: RETURN 
1010 : 

1020 : 

1030 : 

1040 : 

1050 : 

1060 : 

1070 : 

1080 : 

1090 REM "{2SPACE}*****{3SPACE}SPEICHERBANK{ 
3SPACE}***** 

1100 SBS="": PRINT "{UP}" TAB(23)"{5SPACE,5L 
EFT}";: FOR K=1 TO 2: BET KEY BS: IF BS 
=CHRS(13) 

THEN 1110: ELSE SBS=SBS+BS: PRINT BS;: 
NEXT 

1110 SB=VAL(SBS): IF SB>15 THEN PRINT : GOTO 
1100: ELSE PRINT "{HOME,17D0WN}“TAB 
1115 (26)SB: FOR V=1 TO 3: PRINT : NEXT : RE 
TURN 

1120 REM "{2SPACE}*****{4SPACE}FEHLERBEHANDL 
UNG{4SPACE}***** 

1130 TRAP 1130: FZ=EL 

1140 FZ=INT(FZ/10): PRINT "{5LEFT,5SPACE,5LE 
FT}" 

1150 ON FZ—5 GOTO 600,700,800,900,1000,1100 

Listing 14. Ein komfortabler DATA-Wandler (Schluß) 
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TIPS&TRICKS 


in Zeile 150 ist dieses jedoch zu umgehen. 

- Speicherbank: 

Die Speicherbank, aus der gelesen wird, kann alle Werte 
zwischen 0 und 15 annehmen. Die Eingabe erfolgtauf jeden 
Fall dezimal. 

Während der Menüabfrage wird bei einem Eingabefehler 
sofort in eine Fehlerbehandlungsroutine gesprungen, die 
aber nur solche Fehler abfängt, welche vom Betriebssystem 
erkannt werden (SYNTAX ERROR oder OVERFLOW 
ERROR). Damit die Fehlerbehandlung funktioniert, müssen 
auch die Zeilen mit den Doppelpunkten abgetippt werden. 
Dies ist folgendermaßen zu begründen: In der Variable EL 
steht die Zeilennummer, in der der Fehler aufgetreten ist. Der 
Vorkommateil des Zehntels von EL wird mit zehn multipliziert. 
Man erhält so die erste Zeilennummer des Unterprogram- 
mes, in dem der Fehler aufgetreten ist, wohin dann verzweigt 
wird. REM-Zeilen werden durch Doppelpunkte ersetzt. 

Sind die Eingaben beendet und bestätigt, werden die Zei¬ 
len 290 bis 1150 gelöscht, damit das zu erstellende Pro¬ 
gramm bei Zeilennummer 300 beginnen kann. 

Wenn Sie schon auf dem C 64 mit DATA-Wandlern gearbei¬ 
tet haben, werden Sie sich sicher darüber wundern, daß bei 
diesem Programm nicht unter jedem Zeilenblock Zeilennum¬ 
mer, Schrittweite, momentane Adresse und Endadresse ste¬ 
hen. Der Grund dafür ist in der verschiedenen Speicherform 
für Variable zu suchen. Der C64 speichert die Variablen 
direkt hinter dem Basic-Programm. Die Folge ist, daß sie von 
jeder neuen Zeile überschrieben werden. Der C128 legt die 
Variablen deshalb in einer separaten Speicherbank ab. Sie 
werden deshalb nicht gelöscht. 

(Christian Maul/dm) 


£ REM u ^i F i NI i5!^T^5N^iT8P TEN ‘- 1 * 
30 REM F10 = HELP-TASTE 
40 REM VON FRANK PROBST IM MAX '86 
50 : 

60 A*="G064"+CHR*(13) 


80 


F=10 

S 

REM 

F-TASTENNUMMER 

BANK 1 

: 

REM 

VARIABLENBANK 

> SD=POINTER(A*) 

IN8DISCRIPTORS 

s 

REM 

ADRESSE DES STR 

» L=PEEK < SD) 

: 

REM 

= L=LEN(A*> 

> POKE 252,PEEK(SD+1) 
INBZEISERS 

: 

REM 

LO-BYTE DES STR 

> POKE 253,PEEK < SD+2): 
INGZEISERS 

REM 

HI-BYTE DES STR 

> POKE 254,1 

> : 

> BANK 15 

: 

REM 

BANKNUMMER 

. SYS 65381,252,F,L 

Y (*FF65> 

s 

REM 

AUFRUF VON PFKE 


150 


Listing 15. Neue Funktion für <SHIFT+RUN/STOP > 


Zehn Funktionstasten belegen 


Wer hat beim Eintippen eines Programms nicht schon mal 
< SHIFT+ RUN/STOP > gleichzeitig gedrückt. Liegt zu allem 
Unglück noch eine Diskette im eingeschalteten Disketten¬ 
laufwerk, erlebt man einige schreckliche Sekunden. Das 
erste Programm wird mit DLOAD "* " geladen und überschreibt 
ein im Speicher befindliches. Kein noch so guter OLD-Befehl 
mindert das Drama. 


10 REM ************************** 

IGHT*(TI*,2): CHAR 1,4,16,TT*,1 

20 REM ** UHR ** 

320 ;r TI*="000000" THEN GOSUB 450: CHAR 1,4 

30 REM ** H. TETENS ** 

,21,D*,1 

40 REM ** <C)************31.12.85* 

330 IF TlOUl THEN BOX 1 ,H1-1 ,K1-1B,H1+1 ,K1 

50 : 

+18,LI,1: H1=MX+X(T1)*10: K1=MY-Y(TI)*10 

60 GRAPHIC 0,1: COLOR 0,6: COLOR 1,2 

: L1=T1*6 

70 INPUT “BITTE UHRZEIT «STUNDE.MINUTE)T* 

340 IF T20U2 THEN BOX 1 ,H2-1 ,K2-25,H2+1 ,K2 

80 INPUT "UND NOCH DAS HEUTIGE DATUMt2RIBHT> 

+25,L2,1; H2=MX+X(T2)*17: K2=MY-Y(T2)*17 

31.12.1985{12LEFT > "; D* 

: L2=T2*6 

90 IF LEN (D$X>10 THEN 80: ELSE GOSUB 440 

350 DRAW 1,MX+X(U3)*(—8),MY-Y(U3)*(—S) TO MX 

100 IF MID*(T*,2,l)=“." THEN T*="0"+T* 

+X(U3)*43,MY-Y(U3)*43 

110 TI*=LEFT* (T*,2 > +MID*(T*,4,2 > +"00" 

360 BOX 3,H1—1,K1-18,H1+1,K1+18,L1,1 

120 PRINT CHR*(27)"X" 

370 BOX 3,H2-1,K2-25,H2+1,K2+25,L2,1 

130 GRAPHIC 3,1: COLOR 0,10: COLOR 1,1: COLO 

380 DRAW 2,MX+X(T3)*(—8),MY—Y(T3)*(—8) TO MX 

R 2,3: COLOR 3,6: COLOR 4,1: COLOR 5,2 

+X(T3)*43,MY-Y(T3)*43 

140 MX=93: MY=69 

390 IF TlOUl THEN PLAY "T9 04 QAFG HC QCGA 

150 BOX 1,2,2,158,198; BOX 1,4,4,156,196: 

WF": IF Tl/5=INT(Tl/5> THEN 

REM AUSSENRAND 

FOR 1=1 TO Tl/5: PLAY "T9 04 QGE WC": NE 

160 BOX 1,12,120,53,142,,1: BOX 1,12,158,112 

XT 

,183,,1: REM AUSMAHL 

400 U1=T1: U2=T2: U3=T3 

170 BOX 1,10,118,55,144: BOX 1,10,156,114, 

410 T3=VAL(RIGHT*(TI*,2)): IF T3=U3 THEN 410 

185: REM AUSMAHLRAND 1 

: ELSE 300 

1B0 BOX 1,8,116,57,146: BOX 1,8,154,116,1 

420 : 

87: REM AUSMAHLRAND 2 

430 REM * * * WOCHENTAGBERECHNUNG UND D 

190 CHAR 1,4,16,"00:00:00",1 

ATUMSFDRMATIERUNG * * * 

200 CHAR 1,4,21,D*,1 

440 DT=VAL(LEFT*(D*,2)): DM=VAL(MID*(D*,4,2) 

210 CIRCLE 1,MX,MY,56,56: CIRCLE 1,MX,MY,49, 

>: DJ =VAL(RIGHT*(D*,4)): GOTO 460 

49: PAINT 1,MX-51,MY,1 

450 DT=DT+1: IF(DT=29 AND DM=2> 0R(DT=31 AND 

220 CIRCLE 1,MX,MY,46,46: CIRCLE 1,MX,MY,6,6 

(DM=4 OR DM=6 OR DM=9 OR DM=11>) OR 

: PAINT 1,MX,MY—10,1 

DT=32 THEN DT=1: DM=DM+1: IF DM=13 THEN 

230 : DIM X(60): DIM Y(60> 

DM=1: DJ=DJ+1 

240 : FOR 1=0 TO 59: J=6*I*«/180: X(I)=SIN(J 

460 WT=INT(365.25*(DJ+(DM<3)>)+INT(30.6*(DM+ 

): Y(I)=COS(J> 

1-12*(DM<3)))+DT—621049 

250 : DRAW 2,MX+Y(I>*44,MY+X(I)*44 TO MX+Y ( 

470 WU=INT((WT/7—INT(WT/7>)*7+0.5): RESTORE 

I)*50,MY+X(I)*50 

480 DATA SONNTAG,MONTAG,DIENSTAG,MITTWOCH,DO 

260 : IF I/5=INT(1/5) THEN DRAW 3,MX+Y(I>*4 

NNERSTAG,FREITAG,SAMSTAG 

4,MY+X(I)*44 TO MX+Y(I)*54,MY+X(I) *54 

490 FOR 1=0 TO WU: READ DT*: NEXT 

270 : NEXT 

500 D*=LEFT*(DT*+"<8SPACE>",13)+RIGHT*(STR*( 

280 : 

DT),2)+"."+RIGHT*(STR* 

290 H1=MX: H2=MX: H3=MX: K1=MY: K2=MY: K3=MY 

(DM) ,2)+"."+RIGHT*(STR*(DJ),4) : RETURN 

300 T2=VAL(MID*(TI*,3,2)): T=VAL(LEFT*(TI*,2 


)): T1=(T—INT(T/12)*12)*5+INT(T2/15) 

Listing 16. Darstellung einer Analog/Digital-Uhr auf dem 

310 TT*=LEFT*(TI*,2)+":“+MID*(TI*,3,2>+.. 

Bildschirm 
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C 128 


10 REM ******************************* 

1120 : FOR 1=0 TO 5-LEN(CS>: GET #1,AS: NEX 

20 REM ** 3*DIRECTORY—PRINT ** 

T I 

30 REM ** H. T E T E N S ** 

1130 : GOTO 1050 

40 REM ** (C)****************31.5.1986* 

1140 : CLOSE 1 

50 : 

1150 : 

60 PRINT "{CLR,DOWN} {RVSON,4SPACE}* * *<2SP 

2000 FZS=CS+" BLOCK FREI.": FS <A—1)=".": B=A 

ACE>H.C2SPACEJT E T E N S<3SPACE>* * * (C 

-1 

){RVOFF}" 

2010 IF B/SOINT (B/S) THEN B=B+1: GOTO 2010 

70 PRINT "<2D0WN> DIESES PROGRAMM DRUCKT DAS 

2020 : OPEN 1,4,(F0-1>: REM ***** DR 

DIRECTORY" 

UCKERROUTINE ***** 

80 PRINT "<3SPACE>DES C-64 ODER C-12B SLOW+F 

2030 : IF Fl=l THEN PRINTttl,CHRS(27) CHRS(1 

AST <!)" 

5); 

90 PRINT "{DOWN} 3-/5-SPALTIG IN INDEX+SCHMA 

2040 : IF F2=l THEN PRINT#1.CHRS(27) CHRS (8 

LSCHRIFT" 

3) CHRS(l);CHRS(27) CHRS(65) CHRS(5 )5 

100 G=RWIND0W<2): IF G=80 THEN 160 

2050 : FOR 1=1 TO F9 

110 PRINT "{DOWNJ (1) 40-ZEICHEN-MODUS" 

2060 : PRINT#1,"** H.TETENS **" 5 CHRS(14) 

120 PRINT " (2) 80—ZEICHEN—MODUS: DOPPELTE G 

;FS(0 )5 CHRS(20);FZS 

ESCHW.POKE 198,0 

2070 : FOR J=1 TO 79: PRINTttl,"=";: NEX 

130 : GET KEY GS: IF GS<"1" OR GS>"2" THEN 1 

T J: PRINT#1 

30 

2080 : FOR K=1 TO B/S: NS="" 

140 : IF GS="1" THEN 500: ELSE PRINT "{DOWN, 

2090 : FOR L=0 TD S: PRINTttl,NS:FS( 

RVSONJ80-ZEICHEN-MODUS EIN{RVOFF>, DANN 

K+L*B/S) 5 : NS=" ": NEXT L: PRINT#1 

RETURN" 

2100 : NEXT K: IF F9>1 THEN PRINT# 1 : 

150 : INPUT GS: IF GS=“" THEN 100 

PRINT#1: PRINT#1 

160 : FAST 

2110 : NEXT I 

500 DIM FS(200): GOSUB 3000: REM -DRUCKER- 

2120 : PRINT# 1,CHRS(27) CHRS(64) 

AUSWAHL, SCHRIFT-AUSWAHL 

2130 : CLOSE 1 

510 PRINT "{3D0WN,RVSON>MENU:{RVOFF>" 

2140 GOTO 510 

520 PRINT " (0) GELESENE DISKETTE NOCHMAL DR 

2150 : 

UCKEN" 

3000 PRINT “{3DDWNIBITTE “ CHRS(18)"DRUCKER" 

530 PRINT (1) NAECHSTE DISK LESEN, 1 MAL D 

CHRS(146)" EINSCHALTEN,{2SPACETWAEHLEN 

RUCKEN" 

:" ' 

540 PRINT ” (2) NAECHSTE DISK LESEN, 2 MAL D 

3010 PRINT " (1) FX-80 EPSON": PRINT " (2) F 

RUCKEN" 

+ RITEMAN": POKE 198,0 

550 PRINT '• (3) NAECHSTE DISK LESEN, 3 MAL D 

3020 : GET KEY GS: IF GS>="1" AND GS<="2" TH 

RUCKEN" 

EN F0=VAL(GS): ELSE GOTO 3020 

560 PRINT " (4) NAECHSTE DISK LESEN, 4 MAL D 

3030 : IF F0=1 THEN PRINT "{DOWN,RVSON}FX-B0 

RUCKEN" 

-SCHRIFT:{RVOFF}": ELSE PRINT “{DOWN,R 

570 PRINT " 8 D) DRUCKER, SCHRIFT AENDERN" 

VSONTF+ -SCHRIFT:{RVOFF}" 

580 PRINT " (E) ENDE": GS='"': POKE 198,0 

3040 PRINT “ (1) NORMAL-SCHRIFT, DIN A-4, 3- 

590 GET GS: IF GS="E" THEN SLOW : END 

SPALTIG" 

600 : IF GS="D" THEN GOSUB 3000: GOTO 510 

3050 PRINT •• (2) INDEX-SCHRIFT, {2SPACE}DIN A 

610 : IF GS="" OR GS<"0" DR GS>"9” THEN 590 

-4, 3—SPALTIG" 

620 : IF GS="0" THEN F9=l: GOTO 2020 

3060 PRINT " (3) SCHMAL-SCHRIFT, DISK,{4SPAC 

630 F9=VAL(GS) 

E}3—SPALTIG" 

640 : 

3070 PRINT " (4) INDEX + SCHMAL, DISK,{4SPAC 

1000 : OPEN 1,8,0,"S“: REM ******* LES 

E}3—SPALTIG" 

EROUTINE ******* 

3080 PRINT " (5) SCHMAL-SCHRIFT, DIN A-4, 5- 

1010 : PRINT "{DOWN,RVSON}"; 

SPALTIG" 

1020 : GET #1,AS,AS,AS,AS,AS,AS,AS 

3090 PRINT “ ( 6 ) INDEX + SCHMAL, DIN A-4, 5- 

1030 : IF STO0 THEN PRINT " {RVSON}»>KEIN 

SPALTIG": POKE 198,0 

DIRECTORY VORHANDEN<<< {RVOFF}": CLOSE 1 

3100 : GET KEY GS: IF GS<"1" OR GS>" 6 ” THEN 

: GOTO 510 

3100 

1040 : A=0: FOR 1=0 TO 6 : FS(I> ="{2SPACE}": 

3110 : G=VAL(GS): S=3: IF G>=5 THEN S=5: G=G 

NEXT 

-2 : REM 3/5-SPALTIG 

1050 : FOR I=LEN(FS(A)> TO 25 

3120 : F1=0: IF B>=3 THEN Fl=l: G=G 

1060 : GET #1,AS: IF AS=CHRS(34> THEN 1 

-2 : REM SCHMAL 

080 

3130 : F2=0: IF G>=2 THEN F2=l 

1070 : FS(A)=FS(A)+AS 

: REM SCHMAL 

1080 : NEXT : PRINT FS(A): A=A+1 

3140 RETURN 

1090 : GET # 1,AS: IF ASO"" THEN 1090 


1100 : GET #1,AS,BS: IF AS="" AND BS="" THE 


N 1140 


1110 : GET #1,AS,BS: CS=STRS(ASC(AS)+ASC(BS 


)*256 >: FS(A)=RIGHTS("{3SPACE}"+CS+" ", 

Listing 17. Drucken Sie sich Ihre Disketten-Directories, die 

5) 

Sie auf die Diskettenhüllen kleben können 


Der C128 hat belegbare Funktionstasten. Jedoch sind es 
derer nicht acht, sondern zehn. Die Kombination 
<SHIFT+RUN/STOP > stellt gewissermaßen <F9> und 
die Taste < HELP> die zehnte Funktionstaste dar. Mit dem 
KEY-Befehl des Basic 7.0 lassen sich aber nur < Fl > bis 
<F8> belegen, so daß man <F9> und <F10> nicht ver¬ 
ändern kann. 

Doch existiert eine Betriebssystem-Routine mit dem 
Namen »PFKEY«. Diese wird vom Basic-Interpreterzur Funk¬ 


tionstastenänderung benutzt. PFKEY unterstützt aber alle 
zehn Funktionstasten. So geht man nun mit PFKEY um: 

Die Zeichenkette, die den Funktionstastentext enthält, 
irgendwo im Speicher ablegen. Das LOW-Byte der Start¬ 
adresse des Strings muß in eine Speicherzelle der Zeropage 
geschrieben werden. Ebenso müssen das High-Byte und die 
BANK-Nummer in den nachfolgenden Speicherzellen ste¬ 
hen. Ein Beispiel: 

$13000 47 4F 36 34 0D 00 00 00 G064ra 


OSSäBL 
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Ih-IENH «M» r»X 



.-Ha-SM.gLSSS.CBSii.. 

4 

PYBTUMPF 

PRQ 

IG 

26NUT WIDERSTAND 

PRG 

3 

43 RECHTECK ZEX 

PRQ 

2 

WUERFEL NEIPP 

PRQ 

7 

27 (JUADR-PK1 .H 

PHH 

3 

4tiA RECHTECK ZE I 

PRO 

2 

1 QUADER SCHNEI 

PRQ 

B 

27 RECHT.D.ECK 

PRQ 

3 

49 F4-SCHRIFTEN 

PRQ 

6 

2 QUADER H.KOMM. 

PRO 

1 

20 FIBONACCI 

PRQ 

6 

49B BEO.FILE W/R 

PRG 

i 

3 FUNKT.PLOT TE 

PRQ 

3 

29 SORTIEREN 

PRQ 

2 

50 KOPFRECHNEN 

PHH 

5 

4 QUAD.-H-IN.GL.N 

PRQ 

6 

30 SORTIEREN TE 

PRQ 

39 

EHMANN FAST KOMP 

PRG 

3 

3 KESTUMPF N 

PRQ 

3 

31 ZAHLENRATEN 

PRQ 

7 

49C SEQ.FILE W/R 

PRQ 

2 

ZElTKONST.KOND 

PRG 

13 

32 SPEISENPARODI 

PRG 

2 

31 PRIMZAHLEN 

PRG 

2 

7ZE 17KONST..KUND 

PRQ 

/ 

33 TRANS181OKEN 

PRQ 

33 

34 HANG 

PRQ 

2 

BTRAFO—ME88EN 

PRG 

a 

33.1 VARIATION 

PRQ 

6 

33 VERSUCH HU 

PRQ 

3 

1« C-ZEXTKQN8T. 

PRQ 

2 

34 LOTTO 

PRG 

2 

3 PRG 

4 

9 KONDEN5.AUFB. 

PRG 

4 

33A HORT 1 

PRQ 

7 

33E BOR 1 EHT1ANN 

PRQ 

2 

11 PUNKTE-NOTEN 

PRQ 

4 

33B BORT 2 

PRG 

11 

36 AUFQ.10/4 MO 

PRQ 

2 

13 BENZXNPREI8 

PRQ 

4 

33C BORT 3 

PRG 

1 

33 AUFG.ie/1 MO 

PRG 

23 

12 KSTU HU 

PRQ 

1 

33D GORT ZENSUR 

PRG 

G 

34Ö KOPFRECHNEN 

PRQ 

2 

14 VERKUPFERUNG 

PRQ 

10 

KLA3S.LIBT HO 

PRQ 

B 

34 B KQPFRECH TE 

PRG 

1 

13 HERON TE 

PRQ 

4 

37MO-TIERE-BORT 

PRQ 

3 

37 INPUT 12B 

PRQ 

3 

16 DEBZN BEND 

PRQ 

10 

36KLASS.LXST HO 

PRO 

47 

KIPPSCHALTUNGEN 

PRG 

9 

17 G—ZE ITKONÖ T . 

PRQ 

14 

NUTEN HU 

PRQ 

1 

30 CR9R MALT 

PRQ 

2 

1B TANNENBAUM TE 

PRQ 

20 

36T KLA8SENLI8T 

PRQ 

13 

61 RATEN8PAREN 

PRQ 

2 

19 DIVIBIONSL. 

PRQ 

2 

3B QRAPHXC VERB. 

PRQ 

2 

60 ORTELT QB 

PRQ 

12 

17 MIT FORTO 

PRG 

13 

7A BPEISP. 

PRQ 

1 1 

63 D1RECTURY-PRI 

PRQ 

14 

1/.1 MIT FORTO 

PRQ 

3 

11A PUNKT-NOT/BC 

PRQ 

7 

39 GQUA3H 

PRQ 

1 

22 FUNKT.PLOT RC 

PRQ 

4 

4? 8EQ.FILE N/R 

PRQ 

12 

64 DIRECTORY-PRI 

PRG 

1 

21 FUNKT.PLOT TE 

PRG 

2 

39 R XEGENBUCHST 

PRG 

9 

4QC1 SORf AQ 

PRQ 

3 

24 ZINBEBZINB TE 

PRQ 

6 

40 READ DATA UEB 

PRQ 

13 

48F BGRT-COM-AQ 

PRG 

3 

23 ZXNBE8ZINS TE 

PRQ 

13 

41 TRANSI8TOR HO 

PRQ 

12 

3A DIRECTORY-PRI 

PRQ 

8 

20 LEHRER 7 

PRQ 

4 

42 SEQ.FXLE TEST 

PRG 

3 

70 NIMM 

PRG 

12 

COM. 19 SYNTAX 10 

PRQ 

10 

43 MAH1FKMIND 

PRQ 




3 

23 <KO—TANNE HO 

PRQ 

1 

44 F+ DRUCK-TEBT 

PRQ 




Bild 2. Ausdruck eines Disketten-Directories auf einem 



Epson-Drucker oder Kompatiblen 






10 GRAPHIC 1,1 
20 DQ UNTIL E=180 
30 E=E+4 

40 CIRCLE 1,159,99,E,,,,E,72 

50 LOOP 

100 OPEN 1,4 

110 FOR T=312 TO 0 STEP -8 
120 DRAW 1,T,0 TO T,199 
130 SSHAPE A*,T,0,T+7,199 
140 A*=LEFT#(At,200) 

150 PRINT#1,CHR*<8)+A* 

160 NEXT 

170 PRINT#1,CHRS(15) 

180 CLOSE 1 


Listing 18. Hardcopy-Routine 
für den CI28 


Jetzt muß die Adresse in die Zeropage geschrieben wer¬ 
den: 

35000FB 00 30 01 ... 

Der nächste Schritt ist das Laden des Akkus mit der 
Zeropage-Adresse. Für das Beispiel wäre das: 

LDA #$FB 

Nun noch die gewählte Funktionstastennummer in das X- 
Register: 

LDX #$0A (für die HELP-Taste) 

und die Länge des Textes in das Y-Register: 

LDY #$05 (G064 + <RETURN> = 5 Zeichen) 

Abschließend in die Routine PFKEY springen: 

JMP $FF65 beziehungsweise JSR $FF65 
Listing 15 erledigt das alles für Sie in Basic. Die Variable F 
enthält die Funktionstastennummer, A$ den Tastentext. 

(Frank Probst/dm) 


Dafür benötigt man also nun ein Programm, das diese Pro¬ 
bleme löst. Mit Listing 17 können Sie selbst, sofern Sie im 
Besitz eines Epson-Druckers oder Kompatiblen sind, so 
schöne Disketten-Directories wie aus Bild 2 ersichtlich, aus- 
drucken. 

Einmal mit RUN gestartet, erklärt sich dieses Programm 
selbst. Andere Druckertypen können leicht an das Programm 
angepaßt werden. (Hauke Tetens/dm) 




Digital/Analog-Uhr 


Will man mal die Zeit wissen, muß auf die Uhr gesehen wer¬ 
den. Diese Software-Uhr (Listing 16) zeigt einem eine HiRes- 
Uhr schön groß, farbig und sowohl analog mit Stunden-, 
Minuten- und Sekundenzeiger als auch digital mit Stunden, 
Minuten und Sekunden. Zusätzlich »schlägt« die Computer- 
Uhr alle Viertelstunde und zu jeder vollen Stunde die Anzahl 
der Stunden. 

Nach dem Start durch RUN muß erst die aktuelle Zeit einge¬ 
geben werden (Eingabe in Stunden und Minuten). Danach 
möchte das Programm das Datum des jeweiligen Tages wis¬ 
sen. Den Wochentag berechnet sich das Programm selbst 
(Zeilen 430 bis 500). Ebenfalls berücksichtigt wird, ob der 
Monat 28, 30 oder 31 Tage hat. Für die Wochentagsberech¬ 
nung werden auch die Schaltjahre berücksichtigt. 

(Hauke Tetens/dm) 


Directory-Ausdruck 



Bild 3. So sieht eine mit der HiRes-Hardcopy 
ausgedruckte Grafik aus 


Ordnung ist das halbe Leben. Aber wie soll man auf welchen 
Disketten welche Dateien finden, wenn es deren zu viele 
gibt? Natürlich, man kann sich ja das Directory ausdrucken 
lassen und dann auf die Diskettenhülle kleben, eventuell die 
Rückseite der Diskette noch daneben. 

Doch Epson-Drucker (und Kompatible) können auch klein 
und schmal drucken, nur geht das beim Directory leider nicht 
so ohne weiteres und hätte auch nicht das richtige Format. 


HiRes-Hardcopy 


Das kleine Programm (Listing 18) gibt auf jedem herkömmli¬ 
chen, grafikfähigen Drucker eine Hardcopy des ersten Gra¬ 
fikbildschirms aus. Die Zeilen 10 bis 60 gehören nicht dazu, 
sie dienen nur dazu, eine Grafik als Demo zu zeichnen (Bild 
3). Die eigentliche Routine beginnt erst ab Zeile 100. 

(Helmut Mestrovic/dm) 
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